Windows NT DGPENSV2LPKMN 10.0 build 14393 (Windows Server 2016) AMD64
Apache/2.4.46 (Win64) OpenSSL/1.1.1h PHP/7.3.25
: 172.16.0.66 | : 172.16.0.254
Cant Read [ /etc/named.conf ]
7.3.25
SYSTEM
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
[ A ]
[ C ]
[ D ]
C: /
xampp7 /
perl /
lib /
[ HOME SHELL ]
Name
Size
Permission
Action
App
[ DIR ]
drwxrwxrwx
Archive
[ DIR ]
drwxrwxrwx
Attribute
[ DIR ]
drwxrwxrwx
B
[ DIR ]
drwxrwxrwx
CORE
[ DIR ]
drwxrwxrwx
CPAN
[ DIR ]
drwxrwxrwx
Carp
[ DIR ]
drwxrwxrwx
Class
[ DIR ]
drwxrwxrwx
Compress
[ DIR ]
drwxrwxrwx
Config
[ DIR ]
drwxrwxrwx
DBM_Filter
[ DIR ]
drwxrwxrwx
Data
[ DIR ]
drwxrwxrwx
Devel
[ DIR ]
drwxrwxrwx
Digest
[ DIR ]
drwxrwxrwx
Encode
[ DIR ]
drwxrwxrwx
Exporter
[ DIR ]
drwxrwxrwx
ExtUtils
[ DIR ]
drwxrwxrwx
File
[ DIR ]
drwxrwxrwx
Filter
[ DIR ]
drwxrwxrwx
Getopt
[ DIR ]
drwxrwxrwx
HTML
[ DIR ]
drwxrwxrwx
HTTP
[ DIR ]
drwxrwxrwx
Hash
[ DIR ]
drwxrwxrwx
I18N
[ DIR ]
drwxrwxrwx
IO
[ DIR ]
drwxrwxrwx
IPC
[ DIR ]
drwxrwxrwx
JSON
[ DIR ]
drwxrwxrwx
List
[ DIR ]
drwxrwxrwx
Locale
[ DIR ]
drwxrwxrwx
MIME
[ DIR ]
drwxrwxrwx
Math
[ DIR ]
drwxrwxrwx
Memoize
[ DIR ]
drwxrwxrwx
Module
[ DIR ]
drwxrwxrwx
Net
[ DIR ]
drwxrwxrwx
Params
[ DIR ]
drwxrwxrwx
Parse
[ DIR ]
drwxrwxrwx
Perl
[ DIR ]
drwxrwxrwx
PerlIO
[ DIR ]
drwxrwxrwx
Pod
[ DIR ]
drwxrwxrwx
Scalar
[ DIR ]
drwxrwxrwx
Search
[ DIR ]
drwxrwxrwx
Sub
[ DIR ]
drwxrwxrwx
Sys
[ DIR ]
drwxrwxrwx
TAP
[ DIR ]
drwxrwxrwx
Term
[ DIR ]
drwxrwxrwx
Test
[ DIR ]
drwxrwxrwx
Test2
[ DIR ]
drwxrwxrwx
Text
[ DIR ]
drwxrwxrwx
Thread
[ DIR ]
drwxrwxrwx
Tie
[ DIR ]
drwxrwxrwx
Time
[ DIR ]
drwxrwxrwx
Unicode
[ DIR ]
drwxrwxrwx
User
[ DIR ]
drwxrwxrwx
Win32API
[ DIR ]
drwxrwxrwx
auto
[ DIR ]
drwxrwxrwx
autodie
[ DIR ]
drwxrwxrwx
encoding
[ DIR ]
drwxrwxrwx
overload
[ DIR ]
drwxrwxrwx
pods
[ DIR ]
drwxrwxrwx
threads
[ DIR ]
drwxrwxrwx
unicore
[ DIR ]
drwxrwxrwx
version
[ DIR ]
drwxrwxrwx
warnings
[ DIR ]
drwxrwxrwx
.packlist
90.13
KB
-rw-rw-rw-
AnyDBM_File.pm
2.56
KB
-rw-rw-rw-
AutoLoader.pm
15.43
KB
-rw-rw-rw-
AutoSplit.pm
19.18
KB
-rw-rw-rw-
B.pm
28.78
KB
-rw-rw-rw-
Benchmark.pm
30.3
KB
-rw-rw-rw-
CORE.pod
3.11
KB
-rw-rw-rw-
CPAN.pm
142.98
KB
-rw-rw-rw-
Carp.pm
35.12
KB
-rw-rw-rw-
Config.pm
3.3
KB
-rw-rw-rw-
Config.pod
258.26
KB
-rw-rw-rw-
Config_git.pl
421
B
-rw-rw-rw-
Config_heavy.pl
37.27
KB
-rw-rw-rw-
Cwd.pm
21.43
KB
-rw-rw-rw-
DB.pm
18.48
KB
-rw-rw-rw-
DBM_Filter.pm
14.05
KB
-rw-rw-rw-
Digest.pm
10.45
KB
-rw-rw-rw-
DirHandle.pm
2.04
KB
-rw-rw-rw-
Dumpvalue.pm
17.25
KB
-rw-rw-rw-
DynaLoader.pm
25.33
KB
-rw-rw-rw-
Encode.pm
31.33
KB
-rw-rw-rw-
English.pm
4.65
KB
-rw-rw-rw-
Env.pm
5.39
KB
-rw-rw-rw-
Errno.pm
92.68
KB
-rw-rw-rw-
Exporter.pm
18.36
KB
-rw-rw-rw-
Fatal.pm
57.64
KB
-rw-rw-rw-
Fcntl.pm
3.95
KB
-rw-rw-rw-
FileCache.pm
5.42
KB
-rw-rw-rw-
FileHandle.pm
6.63
KB
-rw-rw-rw-
FindBin.pm
4.45
KB
-rw-rw-rw-
GDBM_File.pm
2.03
KB
-rw-rw-rw-
IO.pm
1.42
KB
-rw-rw-rw-
Internals.pod
2.51
KB
-rw-rw-rw-
Memoize.pm
35.34
KB
-rw-rw-rw-
NDBM_File.pm
3.01
KB
-rw-rw-rw-
NEXT.pm
18.54
KB
-rw-rw-rw-
O.pm
4.19
KB
-rw-rw-rw-
ODBM_File.pm
2.9
KB
-rw-rw-rw-
Opcode.pm
15.57
KB
-rw-rw-rw-
POSIX.pm
19.87
KB
-rw-rw-rw-
POSIX.pod
78.81
KB
-rw-rw-rw-
PerlIO.pm
14.1
KB
-rw-rw-rw-
SDBM_File.pm
3.72
KB
-rw-rw-rw-
Safe.pm
24.5
KB
-rw-rw-rw-
SelectSaver.pm
1.05
KB
-rw-rw-rw-
SelfLoader.pm
17.27
KB
-rw-rw-rw-
Socket.pm
36.19
KB
-rw-rw-rw-
Storable.pm
48.75
KB
-rw-rw-rw-
Symbol.pm
4.69
KB
-rw-rw-rw-
Test.pm
29.34
KB
-rw-rw-rw-
Test2.pm
6.24
KB
-rw-rw-rw-
Thread.pm
8.09
KB
-rw-rw-rw-
UNIVERSAL.pm
6.44
KB
-rw-rw-rw-
Win32.pm
57.28
KB
-rw-rw-rw-
Win32CORE.pm
1.27
KB
-rw-rw-rw-
XSLoader.pm
11.37
KB
-rw-rw-rw-
_charnames.pm
33.35
KB
-rw-rw-rw-
attributes.pm
15.97
KB
-rw-rw-rw-
autodie.pm
12.23
KB
-rw-rw-rw-
autouse.pm
4.14
KB
-rw-rw-rw-
base.pm
10.7
KB
-rw-rw-rw-
bigint.pm
22.85
KB
-rw-rw-rw-
bignum.pm
20.64
KB
-rw-rw-rw-
bigrat.pm
15.78
KB
-rw-rw-rw-
blib.pm
2.01
KB
-rw-rw-rw-
bytes.pm
3.65
KB
-rw-rw-rw-
bytes_heavy.pl
758
B
-rw-rw-rw-
charnames.pm
20.44
KB
-rw-rw-rw-
constant.pm
14.38
KB
-rw-rw-rw-
deprecate.pm
4.5
KB
-rw-rw-rw-
diagnostics.pm
18.85
KB
-rw-rw-rw-
dumpvar.pl
15.19
KB
-rw-rw-rw-
encoding.pm
22.41
KB
-rw-rw-rw-
experimental.pm
7.39
KB
-rw-rw-rw-
feature.pm
18.56
KB
-rw-rw-rw-
fields.pm
9.25
KB
-rw-rw-rw-
filetest.pm
3.91
KB
-rw-rw-rw-
if.pm
3.53
KB
-rw-rw-rw-
integer.pm
3.18
KB
-rw-rw-rw-
less.pm
3.13
KB
-rw-rw-rw-
lib.pm
6.2
KB
-rw-rw-rw-
locale.pm
4.74
KB
-rw-rw-rw-
meta_notation.pm
2.07
KB
-rw-rw-rw-
mro.pm
9.66
KB
-rw-rw-rw-
ok.pm
967
B
-rw-rw-rw-
open.pm
8.31
KB
-rw-rw-rw-
ops.pm
997
B
-rw-rw-rw-
overload.pm
52.05
KB
-rw-rw-rw-
overloading.pm
1.77
KB
-rw-rw-rw-
parent.pm
2.64
KB
-rw-rw-rw-
perl5db.pl
309.69
KB
-rw-rw-rw-
perlfaq.pm
77
B
-rw-rw-rw-
perllocal.pod
104.69
KB
-rw-rw-rw-
re.pm
24.8
KB
-rw-rw-rw-
sigtrap.pm
8.53
KB
-rw-rw-rw-
sort.pm
3.82
KB
-rw-rw-rw-
strict.pm
4.63
KB
-rw-rw-rw-
subs.pm
901
B
-rw-rw-rw-
threads.pm
37.06
KB
-rw-rw-rw-
utf8.pm
10.18
KB
-rw-rw-rw-
vars.pm
2.4
KB
-rw-rw-rw-
version.pm
1.93
KB
-rw-rw-rw-
version.pod
9.6
KB
-rw-rw-rw-
vmsish.pm
4.21
KB
-rw-rw-rw-
warnings.pm
49.35
KB
-rw-rw-rw-
Delete
Unzip
Zip
${this.title}
Close
Code Editor : bytes.pm
package bytes; our $VERSION = '1.07'; $bytes::hint_bits = 0x00000008; sub import { $^H |= $bytes::hint_bits; } sub unimport { $^H &= ~$bytes::hint_bits; } sub AUTOLOAD { require "bytes_heavy.pl"; goto &$AUTOLOAD if defined &$AUTOLOAD; require Carp; Carp::croak("Undefined subroutine $AUTOLOAD called"); } sub length (_); sub chr (_); sub ord (_); sub substr ($$;$$); sub index ($$;$); sub rindex ($$;$); 1; __END__ =head1 NAME bytes - Perl pragma to expose the individual bytes of characters =head1 NOTICE Because the bytes pragma breaks encapsulation (i.e. it exposes the innards of how the perl executable currently happens to store a string), the byte values that result are in an unspecified encoding. B<Use of this module for anything other than debugging purposes is strongly discouraged.> If you feel that the functions here within might be useful for your application, this possibly indicates a mismatch between your mental model of Perl Unicode and the current reality. In that case, you may wish to read some of the perl Unicode documentation: L<perluniintro>, L<perlunitut>, L<perlunifaq> and L<perlunicode>. =head1 SYNOPSIS use bytes; ... chr(...); # or bytes::chr ... index(...); # or bytes::index ... length(...); # or bytes::length ... ord(...); # or bytes::ord ... rindex(...); # or bytes::rindex ... substr(...); # or bytes::substr no bytes; =head1 DESCRIPTION Perl's characters are stored internally as sequences of one or more bytes. This pragma allows for the examination of the individual bytes that together comprise a character. Originally the pragma was designed for the loftier goal of helping incorporate Unicode into Perl, but the approach that used it was found to be defective, and the one remaining legitimate use is for debugging when you need to non-destructively examine characters' individual bytes. Just insert this pragma temporarily, and remove it after the debugging is finished. The original usage can be accomplished by explicit (rather than this pragma's implicit) encoding using the L<Encode> module: use Encode qw/encode/; my $utf8_byte_string = encode "UTF8", $string; my $latin1_byte_string = encode "Latin1", $string; Or, if performance is needed and you are only interested in the UTF-8 representation: utf8::encode(my $utf8_byte_string = $string); C<no bytes> can be used to reverse the effect of C<use bytes> within the current lexical scope. As an example, when Perl sees C<$x = chr(400)>, it encodes the character in UTF-8 and stores it in C<$x>. Then it is marked as character data, so, for instance, C<length $x> returns C<1>. However, in the scope of the C<bytes> pragma, C<$x> is treated as a series of bytes - the bytes that make up the UTF8 encoding - and C<length $x> returns C<2>: $x = chr(400); print "Length is ", length $x, "\n"; # "Length is 1" printf "Contents are %vd\n", $x; # "Contents are 400" { use bytes; # or "require bytes; bytes::length()" print "Length is ", length $x, "\n"; # "Length is 2" printf "Contents are %vd\n", $x; # "Contents are 198.144 (on # ASCII platforms)" } C<chr()>, C<ord()>, C<substr()>, C<index()> and C<rindex()> behave similarly. For more on the implications, see L<perluniintro> and L<perlunicode>. C<bytes::length()> is admittedly handy if you need to know the B<byte length> of a Perl scalar. But a more modern way is: use Encode 'encode'; length(encode('UTF-8', $scalar)) =head1 LIMITATIONS C<bytes::substr()> does not work as an I<lvalue()>. =head1 SEE ALSO L<perluniintro>, L<perlunicode>, L<utf8>, L<Encode> =cut
Close
