1 files changed, 0 insertions, 45 deletions
diff --git a/contrib/perl5/ext/Opcode/ops.pm b/contrib/perl5/ext/Opcode/ops.pm
deleted file mode 100644
index 9b553b7..0000000
--- a/contrib/perl5/ext/Opcode/ops.pm
+++ /dev/null
@@ -1,45 +0,0 @@
-package ops;
-
-use Opcode qw(opmask_add opset invert_opset);
-
-sub import {
-    shift;
-    # Not that unimport is the prefered form since import's don't
-	# accumulate well owing to the 'only ever add opmask' rule.
-	# E.g., perl -Mops=:set1 -Mops=:setb is unlikely to do as expected.
-    opmask_add(invert_opset opset(@_)) if @_;
-}
-
-sub unimport {
-    shift;
-    opmask_add(opset(@_)) if @_;
-}
-
-1;
-
-__END__
-
-=head1 NAME
-
-ops - Perl pragma to restrict unsafe operations when compiling
-
-=head1 SYNOPSIS  
-
-  perl -Mops=:default ...    # only allow reasonably safe operations
-
-  perl -M-ops=system ...     # disable the 'system' opcode
-
-=head1 DESCRIPTION
-
-Since the ops pragma currently has an irreversible global effect, it is
-only of significant practical use with the C<-M> option on the command line.
-
-See the L<Opcode> module for information about opcodes, optags, opmasks
-and important information about safety.
-
-=head1 SEE ALSO
-
-Opcode(3), Safe(3), perlrun(3)
-
-=cut
-