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.191.200.151
Cant Read [ /etc/named.conf ]
7.4.3-4ubuntu2.28
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
BLACK DEFEND!
README
+ Create Folder
+ Create File
/
usr /
share /
perl /
5.30.0 /
[ HOME SHELL ]
Name
Size
Permission
Action
App
[ DIR ]
drwxr-xr-x
Archive
[ DIR ]
drwxr-xr-x
Attribute
[ DIR ]
drwxr-xr-x
B
[ DIR ]
drwxr-xr-x
CPAN
[ DIR ]
drwxr-xr-x
Carp
[ DIR ]
drwxr-xr-x
Class
[ DIR ]
drwxr-xr-x
Compress
[ DIR ]
drwxr-xr-x
Config
[ DIR ]
drwxr-xr-x
DBM_Filter
[ DIR ]
drwxr-xr-x
Devel
[ DIR ]
drwxr-xr-x
Digest
[ DIR ]
drwxr-xr-x
Encode
[ DIR ]
drwxr-xr-x
Exporter
[ DIR ]
drwxr-xr-x
ExtUtils
[ DIR ]
drwxr-xr-x
File
[ DIR ]
drwxr-xr-x
Filter
[ DIR ]
drwxr-xr-x
Getopt
[ DIR ]
drwxr-xr-x
HTTP
[ DIR ]
drwxr-xr-x
I18N
[ DIR ]
drwxr-xr-x
IO
[ DIR ]
drwxr-xr-x
IPC
[ DIR ]
drwxr-xr-x
JSON
[ DIR ]
drwxr-xr-x
Locale
[ DIR ]
drwxr-xr-x
Math
[ DIR ]
drwxr-xr-x
Memoize
[ DIR ]
drwxr-xr-x
Module
[ DIR ]
drwxr-xr-x
Net
[ DIR ]
drwxr-xr-x
Params
[ DIR ]
drwxr-xr-x
Parse
[ DIR ]
drwxr-xr-x
Perl
[ DIR ]
drwxr-xr-x
PerlIO
[ DIR ]
drwxr-xr-x
Pod
[ DIR ]
drwxr-xr-x
Search
[ DIR ]
drwxr-xr-x
TAP
[ DIR ]
drwxr-xr-x
Term
[ DIR ]
drwxr-xr-x
Test
[ DIR ]
drwxr-xr-x
Test2
[ DIR ]
drwxr-xr-x
Text
[ DIR ]
drwxr-xr-x
Thread
[ DIR ]
drwxr-xr-x
Tie
[ DIR ]
drwxr-xr-x
Time
[ DIR ]
drwxr-xr-x
Unicode
[ DIR ]
drwxr-xr-x
User
[ DIR ]
drwxr-xr-x
autodie
[ DIR ]
drwxr-xr-x
encoding
[ DIR ]
drwxr-xr-x
overload
[ DIR ]
drwxr-xr-x
pod
[ DIR ]
drwxr-xr-x
unicore
[ DIR ]
drwxr-xr-x
version
[ DIR ]
drwxr-xr-x
warnings
[ DIR ]
drwxr-xr-x
AnyDBM_File.pm
2.56
KB
-rw-r--r--
AutoLoader.pm
15.43
KB
-rw-r--r--
AutoSplit.pm
19.18
KB
-rw-r--r--
Benchmark.pm
30.3
KB
-rw-r--r--
CORE.pod
3.11
KB
-rw-r--r--
CPAN.pm
138.75
KB
-rw-r--r--
Carp.pm
35.12
KB
-rw-r--r--
DB.pm
18.48
KB
-rw-r--r--
DBM_Filter.pm
14.05
KB
-rw-r--r--
Digest.pm
10.45
KB
-rw-r--r--
DirHandle.pm
2.04
KB
-rw-r--r--
Dumpvalue.pm
17.14
KB
-rw-r--r--
English.pm
4.65
KB
-rw-r--r--
Env.pm
5.39
KB
-rw-r--r--
Exporter.pm
18.36
KB
-rw-r--r--
Fatal.pm
56.91
KB
-rw-r--r--
FileCache.pm
5.42
KB
-rw-r--r--
FileHandle.pm
6.63
KB
-rw-r--r--
FindBin.pm
4.45
KB
-rw-r--r--
Internals.pod
2.51
KB
-rw-r--r--
Memoize.pm
35.34
KB
-rw-r--r--
NEXT.pm
18.54
KB
-rw-r--r--
PerlIO.pm
10.21
KB
-rw-r--r--
Safe.pm
24.49
KB
-rw-r--r--
SelectSaver.pm
1.05
KB
-rw-r--r--
SelfLoader.pm
17.27
KB
-rw-r--r--
Symbol.pm
4.69
KB
-rw-r--r--
Test.pm
29.34
KB
-rw-r--r--
Test2.pm
6.24
KB
-rw-r--r--
Thread.pm
8.09
KB
-rw-r--r--
UNIVERSAL.pm
6.44
KB
-rw-r--r--
XSLoader.pm
10.99
KB
-rw-r--r--
_charnames.pm
32.39
KB
-rw-r--r--
autodie.pm
12.58
KB
-rw-r--r--
autouse.pm
4.14
KB
-rw-r--r--
base.pm
10.7
KB
-rw-r--r--
bigint.pm
22.85
KB
-rw-r--r--
bignum.pm
20.64
KB
-rw-r--r--
bigrat.pm
15.78
KB
-rw-r--r--
blib.pm
2.01
KB
-rw-r--r--
bytes.pm
3.65
KB
-rw-r--r--
bytes_heavy.pl
758
B
-rw-r--r--
charnames.pm
20.38
KB
-rw-r--r--
constant.pm
14.38
KB
-rw-r--r--
deprecate.pm
5.07
KB
-rw-r--r--
diagnostics.pm
18.59
KB
-rw-r--r--
dumpvar.pl
15.19
KB
-rw-r--r--
experimental.pm
6.9
KB
-rw-r--r--
feature.pm
17.28
KB
-rw-r--r--
fields.pm
9.25
KB
-rw-r--r--
filetest.pm
3.91
KB
-rw-r--r--
if.pm
3.53
KB
-rw-r--r--
integer.pm
3.18
KB
-rw-r--r--
less.pm
3.13
KB
-rw-r--r--
locale.pm
4.74
KB
-rw-r--r--
meta_notation.pm
2.07
KB
-rw-r--r--
ok.pm
967
B
-rw-r--r--
open.pm
7.83
KB
-rw-r--r--
overload.pm
52.04
KB
-rw-r--r--
overloading.pm
1.77
KB
-rw-r--r--
parent.pm
2.51
KB
-rw-r--r--
perl5db.pl
309.69
KB
-rw-r--r--
perlfaq.pm
77
B
-rw-r--r--
sigtrap.pm
8.53
KB
-rw-r--r--
sort.pm
3.82
KB
-rw-r--r--
strict.pm
4.63
KB
-rw-r--r--
subs.pm
901
B
-rw-r--r--
utf8.pm
10.18
KB
-rw-r--r--
utf8_heavy.pl
26.66
KB
-rw-r--r--
vars.pm
2.4
KB
-rw-r--r--
version.pm
1.93
KB
-rw-r--r--
version.pod
9.6
KB
-rw-r--r--
vmsish.pm
4.21
KB
-rw-r--r--
warnings.pm
48.82
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : meta_notation.pm
use strict; use warnings; # A tiny private library routine which is a helper to several Perl core # modules, to allow a paradigm to be implemented in a single place. The name, # contents, or even the existence of this file may be changed at any time and # are NOT to be used by anything outside the Perl core. sub _meta_notation ($) { # Returns a copy of the input string with the nonprintable characters # below 0x100 changed into printables. Any ASCII printables or above 0xFF # are unchanged. (XXX Probably above-Latin1 characters should be # converted to \X{...}) # # \0 .. \x1F (which are "\c@" .. "\c_") are changed into ^@, ^A, ^B, ... # ^Z, ^[, ^\, ^], ^^, ^_ # \c? is changed into ^?. # # The above accounts for all the ASCII-range nonprintables. # # On ASCII platforms, the upper-Latin1-range characters are converted to # Meta notation, so that \xC1 becomes 'M-A', \xE2 becomes 'M-b', etc. # This is how it always has worked, so is continued that way for backwards # compatibility. The range \x80 .. \x9F becomes M-^@ .. M-^A, M-^B, ... # M-^Z, M-^[, M-^\, M-^], M-^, M-^_ # # On EBCDIC platforms, the upper-Latin1-range characters are converted # into '\x{...}' Meta notation doesn't make sense on EBCDIC platforms # because the ASCII-range printables are a mixture of upper bit set or # not. [A-Za-Z0-9] all have the upper bit set. The underscore likely # doesn't; and other punctuation may or may not. There's no simple # pattern. my $string = shift; $string =~ s/([\0-\037])/ sprintf("^%c",utf8::unicode_to_native(ord($1)^64))/xeg; $string =~ s/\c?/^?/g; if (ord("A") == 65) { $string =~ s/([\200-\237])/sprintf("M-^%c",(ord($1)&0177)^64)/eg; $string =~ s/([\240-\377])/sprintf("M-%c" ,ord($1)&0177)/eg; } else { no warnings 'experimental::regex_sets'; # Leave alone things above \xff $string =~ s/( (?[ [\x00-\xFF] & [:^print:]])) / sprintf("\\x{%X}", ord($1))/xaeg; } return $string; } 1
Close
