SILENT KILLERPanel

Current Path: > > usr > local > share > perl5 > LWP > Protocol > http >


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/local/share/perl5/LWP/Protocol/http/

NameTypeSizeLast ModifiedActions
hosts.pm File 487 bytes August 16 2020 04:57:43.

Reading File: //usr/local/share/perl5/LWP/Protocol/http//hosts.pm

package LWP::Protocol::http::hosts;

use strict;
use warnings;
use parent 'LWP::Protocol::http';
use LWP::UserAgent::DNS::Hosts;

sub _extra_sock_opts {
    my ($self, $host, $port) = @_;

    my @opts = $self->SUPER::_extra_sock_opts($host, $port);
    if (my $peer_addr = LWP::UserAgent::DNS::Hosts->_registered_peer_addr($host)) {
        push @opts, (PeerAddr => $peer_addr, Host => $host);
    }

    return @opts;
}

sub socket_class { 'LWP::Protocol::http::Socket' }

1;

__END__

SILENT KILLER Tool