NAME
    LWP::Protocol::https::SocksChain - Speak HTTPs through Net::SC

SYNOPSIS
     use LWP::UserAgent;
     use LWP::Protocol::https::SocksChain;
     LWP::Protocol::implementor( https => 'LWP::Protocol::https::SocksChain' );

     @LWP::Protocol::https::SocksChain::EXTRA_SOCK_OPTS = ( Chain_Len    => 1,
                                                            Debug        => 0,
                                                            Random_Chain => 1,
                                                            Auto_Save    => 1,
                                                            Restore_Type => 1 );

     my $ua = LWP::UserAgent->new();

     my $req = HTTP::Request->new(
                  GET => 'https://home.sinn.ru/~gosha/perl-scripts/');

     my $res = $ua->request($req) || die $!;

     if ($res->is_success) {
      ...
     } else {
      ...
     }


     or


     use LWP::UserAgent;
     use LWP::Protocol::https::SocksChain;
     LWP::Protocol::implementor( https => 'LWP::Protocol::https::SocksChain' );

     @LWP::Protocol::https::SocksChain::EXTRA_SOCK_OPTS = ( Chain_Len    => 1,
                                                            Debug        => 0,
                                                            Random_Chain => 1,
                                                            Chain_File_Data => [
                                                               '2x0.41.23.164:1080:::4:383 b/s Argentina',
                                                               '24.2x2.88.160:1080:::4:1155 b/s Argentina',
                                                            ],
                                                            Auto_Save    => 0,
                                                            Restore_Type => 0 );

     my $ua = LWP::UserAgent->new();

     my $req = HTTP::Request->new(
                  GET => 'https://home.sinn.ru/~gosha/perl-scripts/');

     my $res = $ua->request($req) || die $!;

     if ($res->is_success) {
      ...
     } else {
      ...
     }

     or

     use LWP::UserAgent;
     use LWP::Protocol::https::SocksChain;
     LWP::Protocol::implementor( https => 'LWP::Protocol::https::SocksChain' );

     $ENV{HTTPS_CERT_FILE} = "certs/notacacert.pem";
     $ENV{HTTPS_KEY_FILE}  = "certs/notacakeynopass.pem";
     $ENV{HTTPS_CA_FILE} = "some_file";
     $ENV{HTTPS_CA_DIR}  = "some_dir";

     @LWP::Protocol::https::SocksChain::EXTRA_SOCK_OPTS = ( Chain_Len    => 1,
                                                            Debug        => 0,
                                                            Random_Chain => 1,
                                                            Chain_File_Data => [
                                                               '2x0.41.23.164:1080:::4:383 b/s Argentina',
                                                               '24.2x2.88.160:1080:::4:1155 b/s Argentina',
                                                            ],
                                                            Auto_Save    => 0,
                                                            Restore_Type => 0 );

     my $ua = LWP::UserAgent->new();

     my $req = HTTP::Request->new(
                  GET => 'https://home.sinn.ru/~gosha/perl-scripts/');

     my $res = $ua->request($req) || die $!;

     if ($res->is_success) {
      ...
     } else {
      ...
     }

     or

     use LWP::UserAgent;
     use LWP::Protocol::https::SocksChain;
     LWP::Protocol::implementor( https => 'LWP::Protocol::https::SocksChain' );


     @LWP::Protocol::https::SocksChain::EXTRA_SOCK_OPTS = ( Chain_Len    => 1,
                                                            Debug        => 0,
                                                            Random_Chain => 1,
                                                            Chain_File_Data => [
                                                               '2x0.41.23.164:1080:::4:383 b/s Argentina',
                                                               '24.2x2.88.160:1080:::4:1155 b/s Argentina',
                                                            ],
                                                            Auto_Save    => 0,
                                                            Restore_Type => 0,
                                                                                                                    
                                                        SSL_cert_file => "certs/notacacert.pem",
                                                            SSL_key_file => "certs/notacakeynopass.pem",
                                                            SSL_ca_file => "some_file",
                                                            SSL_ca_dir  => "some_dir",
                                                                                                                    );

     my $ua = LWP::UserAgent->new();

     my $req = HTTP::Request->new(
                  GET => 'https://home.sinn.ru/~gosha/perl-scripts/');

     my $res = $ua->request($req) || die $!;

     if ($res->is_success) {
      ...
     } else {
      ...
     }

DESCRIPTION
    LWP::Protocol::https::SocksChain enables you to speak HTTPs through
    SocksChain ( Net::SC ). To use it you need to overwrite the implementor
    class of the LWP 'https' scheme.

    The interface of LWP::Protocol::https::SocksChain is similar to
    LWP::Protocol::https. To enable the old HTTP/1.0 protocol driver instead
    of the new HTTP/1.1 driver use LWP::Protocol::https::SocksChain10.

SEE ALSO
    LWP, LWP::Protocol, Net::SC

AUTHOR
     Igor V. Okunev  mailto:igor<at>prv.mts-nn.ru
                     http://www.mts-nn.ru/~gosha
                     icq:106183300

COPYRIGHT AND LICENSE
    Copyright (C) 2005 - 2008 by Igor V. Okunev

    All rights reserved. This library is free software; you can redistribute
    it and/or modify it under the same terms as Perl itself.


INSTALLATION

    To install this module type the following:

       perl Makefile.PL
       make
       make test
       make install

DEPENDENCIES

    This module requires these other modules and libraries:

       LWP

       Net::SC

       IO::Socket::SSL