Linux cpanel2.daytoncreative.net 2.6.32-754.29.2.el6.x86_64 #1 SMP Tue May 12 17:39:04 UTC 2020 x86_64
Apache/2.4.43 (cPanel) OpenSSL/1.1.1g mod_bwlimited/1.4
Server IP : 70.62.220.67 & Your IP : 216.73.216.193
Domains :
Cant Read [ /etc/named.conf ]
User : michaelgreg
Terminal
Auto Root
Create File
Create Folder
Localroot Suggester
Backdoor Destroyer
Readme
/
var /
log /
perl-5.20.2 /
dist /
Carp /
t /
Delete
Unzip
Name
Size
Permission
Date
Action
Carp.t
10.98
KB
-r--r--r--
2014-12-27 11:48
Carp_overload.t
1.4
KB
-r--r--r--
2014-12-27 11:48
arg_regexp.t
2.69
KB
-r--r--r--
2014-12-27 11:48
arg_string.t
1.43
KB
-r--r--r--
2014-12-27 11:48
baduni.t
232
B
-r--r--r--
2014-12-27 11:48
baduni_warnings.t
269
B
-r--r--r--
2014-12-27 11:48
errno.t
1.23
KB
-r--r--r--
2014-12-27 11:48
heavy.t
294
B
-r--r--r--
2014-12-27 11:48
heavy_mismatch.t
276
B
-r--r--r--
2014-12-27 11:48
stash_deletion.t
2.08
KB
-r--r--r--
2014-12-27 11:48
swash.t
99
B
-r--r--r--
2014-12-27 11:48
vivify_gv.t
873
B
-r--r--r--
2014-12-27 11:48
vivify_stash.t
818
B
-r--r--r--
2014-12-27 11:48
with_warnings.t
168
B
-r--r--r--
2014-12-27 11:48
Save
Rename
BEGIN { print "1..5\n"; } our $has_is_utf8; BEGIN { $has_is_utf8 = exists($utf8::{"is_utf8"}); } our $has_dgrade; BEGIN { $has_dgrade = exists($utf8::{"downgrade"}); } our $has_swashnew; BEGIN { $has_swashnew = exists($utf8::{"SWASHNEW"}); } our $has_strval; BEGIN { $has_strval = exists($overload::{"StrVal"}); } our $has_sv2obj; BEGIN { $has_sv2obj = exists($B::{"svref_2object"}); } use Carp; sub { sub { Carp::longmess("x") }->() }->(\1, "\x{2603}", qr/\x{2603}/); print !(exists($utf8::{"is_utf8"}) xor $has_is_utf8) ? "" : "not ", "ok 1\n"; print !(exists($utf8::{"downgrade"}) xor $has_dgrade) ? "" : "not ", "ok 2\n"; print !(exists($utf8::{"SWASHNEW"}) xor $has_swashnew) ? "" : "not ", "ok 3\n"; print !(exists($overload::{"StrVal"}) xor $has_sv2obj) ? "" : "not ", "ok 4\n"; print !(exists($B::{"svref_2object"}) xor $has_sv2obj) ? "" : "not ", "ok 5\n"; 1;