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 /
cpan /
CPAN /
lib /
CPAN /
Delete
Unzip
Name
Size
Permission
Date
Action
API
[ DIR ]
drwxr-xr-x
2015-02-14 16:55
Exception
[ DIR ]
drwxr-xr-x
2015-02-14 16:55
FTP
[ DIR ]
drwxr-xr-x
2015-02-14 16:55
HTTP
[ DIR ]
drwxr-xr-x
2015-02-14 16:55
Kwalify
[ DIR ]
drwxr-xr-x
2015-02-14 16:55
LWP
[ DIR ]
drwxr-xr-x
2015-02-14 16:55
Author.pm
6.68
KB
-r--r--r--
2015-01-31 21:57
Bundle.pm
9.3
KB
-r--r--r--
2014-12-27 11:48
CacheMgr.pm
7.48
KB
-r--r--r--
2015-01-31 21:57
Complete.pm
5.88
KB
-r--r--r--
2014-12-27 11:48
Debug.pm
2.05
KB
-r--r--r--
2014-12-27 11:48
DeferredCode.pm
189
B
-r--r--r--
2014-12-27 11:48
Distribution.pm
156.19
KB
-r--r--r--
2014-12-27 11:48
Distroprefs.pm
11.71
KB
-r--r--r--
2014-12-27 11:48
Distrostatus.pm
972
B
-r--r--r--
2014-12-27 11:48
FTP.pm
41.22
KB
-r--r--r--
2015-01-31 21:57
FirstTime.pm
68.42
KB
-r--r--r--
2014-12-27 11:48
HandleConfig.pm
22.76
KB
-r--r--r--
2015-01-31 21:57
Index.pm
21.69
KB
-r--r--r--
2015-01-31 21:57
InfoObj.pm
6.75
KB
-r--r--r--
2014-12-27 11:48
Kwalify.pm
3.35
KB
-r--r--r--
2014-12-27 11:48
Mirrors.pm
16.3
KB
-r--r--r--
2015-01-31 21:57
Module.pm
21.52
KB
-r--r--r--
2014-12-27 11:48
Nox.pm
953
B
-r--r--r--
2014-12-27 11:48
Prompt.pm
567
B
-r--r--r--
2014-12-27 11:48
Queue.pm
6.78
KB
-r--r--r--
2014-12-27 11:48
Shell.pm
77.76
KB
-r--r--r--
2014-12-27 11:48
Tarzip.pm
16.32
KB
-r--r--r--
2014-12-27 11:48
URL.pm
588
B
-r--r--r--
2014-12-27 11:48
Version.pm
4.29
KB
-r--r--r--
2014-12-27 11:48
Save
Rename
# -*- 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;