Linux moodl-moodle-3s8bw1nuh5yqd9-5b875fdd66-8hs4m 4.4.0-186-generic #216-Ubuntu SMP Wed Jul 1 05:34:05 UTC 2020 x86_64
Apache/2.4.41 (Ubuntu)
: 10.39.0.36 | : 10.36.0.0
Cant Read [ /etc/named.conf ]
7.4.3
www-data
www.github.com/MadExploits
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
CPANEL RESET
CREATE WP USER
README
+ Create Folder
+ Create File
/
usr /
lib /
x86_64-linux-gnu /
perl-base /
[ HOME SHELL ]
Name
Size
Permission
Action
Carp
[ DIR ]
drwxr-xr-x
Exporter
[ DIR ]
drwxr-xr-x
File
[ DIR ]
drwxr-xr-x
Getopt
[ DIR ]
drwxr-xr-x
Hash
[ DIR ]
drwxr-xr-x
IO
[ DIR ]
drwxr-xr-x
IPC
[ DIR ]
drwxr-xr-x
List
[ DIR ]
drwxr-xr-x
Scalar
[ DIR ]
drwxr-xr-x
Text
[ DIR ]
drwxr-xr-x
Tie
[ DIR ]
drwxr-xr-x
auto
[ DIR ]
drwxr-xr-x
unicore
[ DIR ]
drwxr-xr-x
warnings
[ DIR ]
drwxr-xr-x
AutoLoader.pm
5.36
KB
-rw-r--r--
Carp.pm
24.79
KB
-rw-r--r--
Config.pm
3.2
KB
-rw-r--r--
Config_git.pl
409
B
-rw-r--r--
Config_heavy.pl
52.96
KB
-rw-r--r--
Cwd.pm
17.24
KB
-rw-r--r--
DynaLoader.pm
10.18
KB
-rw-r--r--
Errno.pm
4.82
KB
-rw-r--r--
Exporter.pm
2.31
KB
-rw-r--r--
Fcntl.pm
2.11
KB
-rw-r--r--
FileHandle.pm
2.06
KB
-rw-r--r--
IO.pm
469
B
-rw-r--r--
POSIX.pm
19.87
KB
-rw-r--r--
SelectSaver.pm
344
B
-rw-r--r--
Socket.pm
13.54
KB
-rw-r--r--
Symbol.pm
2.05
KB
-rw-r--r--
XSLoader.pm
3.87
KB
-rw-r--r--
attributes.pm
3
KB
-rw-r--r--
base.pm
8.7
KB
-rw-r--r--
bytes.pm
447
B
-rw-r--r--
bytes_heavy.pl
758
B
-rw-r--r--
constant.pm
5.6
KB
-rw-r--r--
feature.pm
4.7
KB
-rw-r--r--
fields.pm
4.89
KB
-rw-r--r--
integer.pm
172
B
-rw-r--r--
lib.pm
2.23
KB
-rw-r--r--
locale.pm
3.34
KB
-rw-r--r--
overload.pm
4.34
KB
-rw-r--r--
overloading.pm
964
B
-rw-r--r--
parent.pm
460
B
-rw-r--r--
re.pm
8.5
KB
-rw-r--r--
strict.pm
1.57
KB
-rw-r--r--
utf8.pm
313
B
-rw-r--r--
utf8_heavy.pl
26.66
KB
-rw-r--r--
vars.pm
1.12
KB
-rw-r--r--
warnings.pm
25.33
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : strict.pm
package strict; $strict::VERSION = "1.11"; my ( %bitmask, %explicit_bitmask ); BEGIN { # Verify that we're called correctly so that strictures will work. # Can't use Carp, since Carp uses us! # see also warnings.pm. die sprintf "Incorrect use of pragma '%s' at %s line %d.\n", __PACKAGE__, +(caller)[1,2] if __FILE__ !~ ( '(?x) \b '.__PACKAGE__.' \.pmc? \z' ) && __FILE__ =~ ( '(?x) \b (?i:'.__PACKAGE__.') \.pmc? \z' ); %bitmask = ( refs => 0x00000002, subs => 0x00000200, vars => 0x00000400, ); %explicit_bitmask = ( refs => 0x00000020, subs => 0x00000040, vars => 0x00000080, ); my $bits = 0; $bits |= $_ for values %bitmask; my $inline_all_bits = $bits; *all_bits = sub () { $inline_all_bits }; $bits = 0; $bits |= $_ for values %explicit_bitmask; my $inline_all_explicit_bits = $bits; *all_explicit_bits = sub () { $inline_all_explicit_bits }; } sub bits { my $bits = 0; my @wrong; foreach my $s (@_) { if (exists $bitmask{$s}) { $^H |= $explicit_bitmask{$s}; $bits |= $bitmask{$s}; } else { push @wrong, $s; } } if (@wrong) { require Carp; Carp::croak("Unknown 'strict' tag(s) '@wrong'"); } $bits; } sub import { shift; $^H |= @_ ? &bits : all_bits | all_explicit_bits; } sub unimport { shift; if (@_) { $^H &= ~&bits; } else { $^H &= ~all_bits; $^H |= all_explicit_bits; } } 1; __END__
Close
