Skip to content

Instantly share code, notes, and snippets.

@RhubarbSin

RhubarbSin/IO-Socket-SSL-TLS-1.2.pl

Created July 10, 2020 01:11
Show Gist options
  • Save RhubarbSin/58cf9c8ddab69c7a83865d8e0df42285 to your computer and use it in GitHub Desktop.
Save RhubarbSin/58cf9c8ddab69c7a83865d8e0df42285 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
IO-Socket-SSL-TLS-1.2.pl
#!/usr/bin/perl
use strict;
use warnings;
use IO::Socket::SSL;
use LWP::UserAgent;
my $ua = LWP::UserAgent->new(ssl_opts => {
verify_hostname => 0,
SSL_version => 'TLSv1_2',
});
my $res = $ua->get('https://google.com');
print $res->as_string;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment