Heray-Was-Here
Server : Apache
System : Linux vps103298.mylogin.co 4.18.0-513.11.1.el8_9.x86_64 #1 SMP Wed Jan 17 02:00:40 EST 2024 x86_64
User : calvet ( 273824)
PHP Version : 7.4.33
Disable Function : NONE
Directory :  /proc/thread-self/root/proc/self/root/usr/local/share/perl5/LWP/Parallel/Protocol/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Current File : //proc/thread-self/root/proc/self/root/usr/local/share/perl5/LWP/Parallel/Protocol/https.pm
# -*- perl -*-
# $Id: https.pm,v 1.3 2002/03/28 20:25:44 langhein Exp $
# derived from: https.pm,v 1.8 1999/09/20 12:48:37 gisle Exp $

use strict;

package LWP::Parallel::Protocol::https;

# Figure out which SSL implementation to use (copy & paste from LWP)
use vars qw($SSL_CLASS);
if ($IO::Socket::SSL::VERSION) {
    $SSL_CLASS = "IO::Socket::SSL"; # it was already loaded
} else {
    eval { require Net::SSL; };     # from Crypt-SSLeay
    if ($@) {
	require IO::Socket::SSL;
	$SSL_CLASS = "IO::Socket::SSL";
    } else {
	$SSL_CLASS = "Net::SSL";
    }
}

use vars qw(@ISA);

require LWP::Parallel::Protocol::http;
require LWP::Protocol::https;
@ISA=qw(LWP::Protocol::https LWP::Parallel::Protocol::http);

package LWP::Parallel::Protocol::https::Socket;

our @ISA = qw(LWP::Protocol::https::Socket);

1;

Hry