Linux server1.dn-server.com 4.18.0-553.89.1.lve.el8.x86_64 #1 SMP Wed Dec 10 13:58:50 UTC 2025 x86_64
LiteSpeed
Server IP : 195.201.204.189 & Your IP : 216.73.216.198
Domains :
Cant Read [ /etc/named.conf ]
User : beriska1
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
2026-04-30 22:45
DTDDecls.pm
16.59
KB
-r--r--r--
2019-06-14 03:48
DebugHandler.pm
1.83
KB
-r--r--r--
2019-06-14 03:48
DocType.pm
4.55
KB
-r--r--r--
2019-06-14 03:54
EncodingDetect.pm
2.57
KB
-r--r--r--
2019-06-14 03:48
Exception.pm
1.67
KB
-r--r--r--
2019-06-14 03:48
NoUnicodeExt.pm
628
B
-r--r--r--
2019-06-14 03:48
Productions.pm
6.47
KB
-r--r--r--
2019-06-14 03:48
Reader.pm
2.48
KB
-r--r--r--
2019-06-14 03:48
UnicodeExt.pm
369
B
-r--r--r--
2019-06-14 03:48
XMLDecl.pm
3.31
KB
-r--r--r--
2019-06-14 03:48
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;