use strict ;
use warnings ;
use IO::Socket::SSL qw(debug4);
use LWP::UserAgent ;
# my $ua = new LWP::UserAgent( ssl_opts => { verify_hostname => 0, SSL_version => 'TLSv1_1' } ); # Runs OK
my $ua = new LWP::UserAgent( ssl_opts => { verify_hostname => 0, SSL_version => 'SSLv3' } ); # Fails
my $response = $ua->get( "https://www.google.com/" ) ;
if ( $response->is_success ) {
  # print $response->as_string;
} else {
  print "Something went wrong\n";
}
__END__
DEBUG:
.../IO/Socket/SSL.pm:598: global error: SSL Version SSLv3 not supported
Something went wrong