use IO::Socket::SSL;

BEGIN {
$ENV{PERL_NET_HTTPS_SSL_SOCKET_CLASS} = "IO::Socket::SSL";
$ENV{PERL_LWP_SSL_VERIFY_HOSTNAME} = 0;
$ENV{PERL_LWP_ENV_PROXY}='http://127.0.0.1';
$ENV{HTTPS_DEBUG} = 1;
}