Help for this page

Select Code to Download

Select or download this

use Net::SSL (); # From Crypt-SSLeay
BEGIN {<br />
  $Net::HTTPS::SSL_SOCKET_CLASS = "Net::SSL"; # Force use of Net::SSL
  $ENV{HTTPS_PROXY} = 'http://10.0.3.1:3128';
}

Select or download this

require LWP::UserAgent;
 
...
} else {
    print "Error: " . $res->status_line . "\n";
}