use IO::Socket::SSL qw( SSL_VERIFY_NONE );
use IO::Socket::INET;

##</code><code>##

my $ua = LWP::UserAgent->new();
$ua->ssl_opts( SSL_verify_mode => IO::Socket::SSL::SSL_VERIFY_NONE, SSL_hostname => '', verify_hostname => 0 );