Subpackage Opcode

gendep.macros

@@ -1172,6 +1172,17 @@ Requires: perl(warnings) \
 Requires: perl(XSLoader) \
 Provides: perl(ODBM_File) = 1.16 \
 %{nil}
+%global gendep_perl_Opcode \
+Requires: perl(:VERSION) >= 5.6.0 \
+Requires: perl(Carp) \
+Requires: perl(Exporter) \
+Requires: perl(Opcode) \
+Requires: perl(strict) \
+Requires: perl(subs) \
+Requires: perl(XSLoader) \
+Provides: perl(Opcode) = 1.43 \
+Provides: perl(ops) = 1.02 \
+%{nil}
 %global gendep_perl_NEXT \
 Provides: perl(NEXT) = 0.67 \
 Provides: perl(NEXT::ACTUAL) \
@@ -1980,7 +1991,6 @@ Requires: perl(File::Basename) \
 Requires: perl(File::Spec) \
 Requires: perl(I18N::LangTags) \
 Requires: perl(IO::File) \
-Requires: perl(Opcode) \
 Requires: perl(Symbol) \
 Requires: perl(Text::Tabs) \
 Requires: perl(Tie::Handle) \
@@ -1999,7 +2009,6 @@ Requires: perl(integer) \
 Requires: perl(overload) \
 Requires: perl(re) \
 Requires: perl(strict) \
-Requires: perl(subs) \
 Requires: perl(threads) \
 Requires: perl(threads::shared) \
 Requires: perl(unicore::Name) \
@@ -2033,7 +2042,6 @@ Provides: perl(Net::hostent) = 1.02 \
 Provides: perl(Net::netent) = 1.01 \
 Provides: perl(Net::protoent) = 1.01 \
 Provides: perl(Net::servent) = 1.02 \
-Provides: perl(Opcode) = 1.43 \
 Provides: perl(POSIX) = 1.88 \
 Provides: perl(POSIX::SigAction) \
 Provides: perl(POSIX::SigRt) \
@@ -2080,7 +2088,6 @@ Provides: perl(feature) = 1.54 \
 Provides: perl(filetest) = 1.03 \
 Provides: perl(less) = 0.03 \
 Provides: perl(locale) = 1.09 \
-Provides: perl(ops) = 1.02 \
 Provides: perl(overload) = 1.30 \
 Provides: perl(overload::numbers) \
 Provides: perl(overloading) = 0.02 \

perl.rpmlintrc

@@ -1,5 +1,5 @@
 from Config import *
-addFilter("spelling-error .* (autoloaded|awk|cacheout|decrement|exe|gdbm|globbing|gmtime|groff|libnet|localtime|Memoizing|metapackage|ndbm|Nestable|odbm|perlbug|perldoc|perlfunc|perlglob|perllocale|perlmain|perlpod|perlsub|reachability|redispatch|rpmbuild|sdbm|sed|splain|truncations|usr|writemain)");
+addFilter("spelling-error .* (autoloaded|awk|cacheout|decrement|exe|gdbm|globbing|gmtime|groff|libnet|localtime|Memoizing|metapackage|ndbm|Nestable|odbm|opcodes|perlbug|perldoc|perlfunc|perlglob|perllocale|perlmain|perlpod|perlsub|reachability|redispatch|rpmbuild|sdbm|sed|splain|truncations|usr|writemain)");
 addFilter("unexpanded-macro %description .* %INC");
 # Applied with "git am"
 addFilter("patch-not-applied Patch58: perl-5.30.0-PATCH-perl-134329-Use-after-free-in-regcomp.c.patch");

perl.spec

@@ -412,7 +412,7 @@ Requires:       perl-Net-Ping, perl-NEXT,
 %if %{with gdbm}
 Requires:       perl-ODBM_File,
 %endif
-Requires:       perl-open,
+Requires:       perl-Opcode, perl-open,
 Requires:       perl-parent, perl-PathTools, perl-Params-Check, perl-perlfaq,
 Requires:       perl-PerlIO-via-QuotedPrint, perl-Perl-OSType,
 Requires:       perl-Pod-Checker, perl-Pod-Escapes, perl-Pod-Html,
@@ -2558,6 +2558,23 @@ a Perl hash, but when your program exits, the data will remain in the file, to
 be used the next time your program runs.
 %endif
 
+%package Opcode
+Summary:        Disable named opcodes when compiling a perl code
+License:        GPL+ or Artistic
+Epoch:          0
+Version:        1.43
+Requires:       %perl_compat
+%if %{defined perl_bootstrap}
+%gendep_perl_Opcode
+%endif
+Conflicts:      perl-interpreter < 4:5.30.1-451
+
+%description Opcode
+The Opcode module allows you to define an operator mask to be in effect when
+perl next compiles any code. Attempting to compile code which contains
+a masked opcode will cause the compilation to fail with an error. The code
+will not be executed.
+
 %package open
 Summary:        Perl pragma to set default PerlIO layers for input and output
 License:        GPL+ or Artistic
@@ -4663,6 +4680,13 @@ popd
 %exclude %{_mandir}/man3/ODBM_File.3*
 %endif
 
+# Opcode
+%exclude %{archlib}/auto/Opcode
+%exclude %{archlib}/Opcode.pm
+%exclude %{archlib}/ops.pm
+%exclude %{_mandir}/man3/Opcode.3*
+%exclude %{_mandir}/man3/ops.3*
+
 # PathTools
 %exclude %{archlib}/Cwd.pm
 %exclude %{archlib}/File/Spec*
@@ -5849,6 +5873,13 @@ popd
 %{_mandir}/man3/ODBM_File.3*
 %endif
 
+%files Opcode
+%{archlib}/auto/Opcode
+%{archlib}/Opcode.pm
+%{archlib}/ops.pm
+%{_mandir}/man3/Opcode.3*
+%{_mandir}/man3/ops.3*
+
 %if %{dual_life} || %{rebuild_from_scratch}
 %files PathTools
 %{archlib}/Cwd.pm
@@ -6264,6 +6295,7 @@ popd
 - Subpackage Hash-Util-FieldHash
 - Subpackage I18N-Langinfo
 - Subpackage mro
+- Subpackage Opcode
 
 * Wed Jan 29 2020 Fedora Release Engineering <releng@fedoraproject.org> - 4:5.30.1-450
 - Rebuilt for https://fedoraproject.org/wiki/Fedora_32_Mass_Rebuild