my $context = new IO::Socket::SSL::SSL_Context(
  SSL_version => 'tlsv1', 
  SSL_verify_mode => Net::SSLeay::VERIFY_NONE(),
  SSL_session_cache_size => 100
);