Linux newlinux5.pouyasazan.org 3.10.0-962.3.2.lve1.5.60.el7.x86_64 #1 SMP Fri Jul 23 07:07:00 EDT 2021 x86_64
LiteSpeed
Server IP : 88.99.66.243 & Your IP : 216.73.216.178
Domains :
Cant Read [ /etc/named.conf ]
User : wdbbsgxf
Terminal
Auto Root
Create File
Create Folder
Localroot Suggester
Backdoor Destroyer
Readme
/
usr /
share /
perl5 /
LWP /
Protocol /
Delete
Unzip
Name
Size
Permission
Date
Action
GHTTP.pm
1.72
KB
-rw-r--r--
2012-01-14 03:55
cpan.pm
1.35
KB
-rw-r--r--
2012-01-14 03:55
data.pm
1.22
KB
-rw-r--r--
2012-01-14 03:55
file.pm
3.74
KB
-rw-r--r--
2012-01-14 03:55
ftp.pm
16.42
KB
-rw-r--r--
2012-01-14 03:55
gopher.pm
5.62
KB
-rw-r--r--
2012-01-14 03:55
http.pm
12.53
KB
-rw-r--r--
2012-11-08 23:26
loopback.pm
601
B
-rw-r--r--
2012-01-14 03:55
mailto.pm
4.32
KB
-rw-r--r--
2012-01-14 03:55
nntp.pm
3.78
KB
-rw-r--r--
2012-01-14 03:55
nogo.pm
630
B
-rw-r--r--
2012-01-14 03:55
Save
Rename
package LWP::Protocol::nogo; # If you want to disable access to a particular scheme, use this # class and then call # LWP::Protocol::implementor(that_scheme, 'LWP::Protocol::nogo'); # For then on, attempts to access URLs with that scheme will generate # a 500 error. use strict; use vars qw(@ISA); require HTTP::Response; require HTTP::Status; require LWP::Protocol; @ISA = qw(LWP::Protocol); sub request { my($self, $request) = @_; my $scheme = $request->uri->scheme; return HTTP::Response->new( &HTTP::Status::RC_INTERNAL_SERVER_ERROR, "Access to \'$scheme\' URIs has been disabled" ); } 1;