Linux worldls-302.fr.planethoster.net 4.18.0-553.8.1.lve.el7h.x86_64 #1 SMP Thu Jul 4 15:19:33 UTC 2024 x86_64
LiteSpeed
Server IP : 10.185.0.203 & Your IP : 216.73.217.14
Domains :
Cant Read [ /etc/named.conf ]
User : gerathty
Terminal
Auto Root
Create File
Create Folder
Localroot Suggester
Backdoor Destroyer
Readme
/
usr /
local /
share /
perl5 /
XML /
SAX /
PurePerl /
Delete
Unzip
Name
Size
Permission
Date
Action
Reader
[ DIR ]
drwxr-xr-x
2017-07-03 23:01
DTDDecls.pm
16.59
KB
-r--r--r--
2009-10-10 23:16
DebugHandler.pm
1.83
KB
-r--r--r--
2009-10-10 23:16
DocType.pm
4.55
KB
-r--r--r--
2009-10-10 23:16
EncodingDetect.pm
2.57
KB
-r--r--r--
2009-10-10 23:16
Exception.pm
1.67
KB
-r--r--r--
2009-10-10 23:16
NoUnicodeExt.pm
628
B
-r--r--r--
2009-10-10 23:16
Productions.pm
6.47
KB
-r--r--r--
2009-10-10 23:16
Reader.pm
2.48
KB
-r--r--r--
2009-10-10 23:16
UnicodeExt.pm
369
B
-r--r--r--
2009-10-10 23:16
XMLDecl.pm
3.31
KB
-r--r--r--
2009-10-10 23:16
Save
Rename
# $Id$ package XML::SAX::PurePerl; use strict; sub chr_ref { my $n = shift; if ($n < 0x80) { return chr ($n); } elsif ($n < 0x800) { return pack ("CC", (($n >> 6) | 0xc0), (($n & 0x3f) | 0x80)); } elsif ($n < 0x10000) { return pack ("CCC", (($n >> 12) | 0xe0), ((($n >> 6) & 0x3f) | 0x80), (($n & 0x3f) | 0x80)); } elsif ($n < 0x110000) { return pack ("CCCC", (($n >> 18) | 0xf0), ((($n >> 12) & 0x3f) | 0x80), ((($n >> 6) & 0x3f) | 0x80), (($n & 0x3f) | 0x80)); } else { return undef; } } 1;