SILENT KILLERPanel

Current Path: > > usr > > share > perl5 > vendor_perl > LWP > > Protocol


Operation   : Linux premium131.web-hosting.com 4.18.0-553.44.1.lve.el8.x86_64 #1 SMP Thu Mar 13 14:29:12 UTC 2025 x86_64
Software     : Apache
Server IP    : 162.0.232.56 | Your IP: 216.73.216.111
Domains      : 1034 Domain(s)
Permission   : [ 0755 ]

Files and Folders in: //usr//share/perl5/vendor_perl/LWP//Protocol

NameTypeSizeLast ModifiedActions
cpan.pm File 1361 bytes June 05 2018 18:49:03.
data.pm File 1233 bytes June 05 2018 18:49:03.
file.pm File 3843 bytes June 05 2018 18:49:03.
ftp.pm File 19140 bytes June 05 2018 18:49:03.
gopher.pm File 5728 bytes June 05 2018 18:49:03.
http.pm File 15111 bytes June 05 2018 18:49:03.
loopback.pm File 586 bytes June 05 2018 18:49:03.
mailto.pm File 4406 bytes June 05 2018 18:49:03.
nntp.pm File 4196 bytes June 05 2018 18:49:03.
nogo.pm File 610 bytes June 05 2018 18:49:03.

Reading File: //usr//share/perl5/vendor_perl/LWP//Protocol/nogo.pm

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;

our $VERSION = '6.34';

require HTTP::Response;
require HTTP::Status;
use base 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;

SILENT KILLER Tool