my $mech = LWP::UserAgent->new(ssl_opts => {
	SSL_key_file    => $key_path,
	SSL_passwd_cb   => sub { return $pass; },
	SSL_ca_file => $ca_path,
	SSL_cert_file   => $crt_path,
	verify_hostname => 1,
	SSL_version => 'TLSv1'
});
my $content = $mech->get($url);
print Dumper($content);

##</code><code>##

$VAR1 = bless( {
                 '_content' => 'Can\'t connect to <url>',
                 '_rc' => 500,
                 '_headers' => bless( {
                                        'client-warning' => 'Internal response',
                                        'client-date' => 'Thu, 01 Aug 2019 09:57:43 GMT',
                                        'content-type' => 'text/plain'
                                      }, 'HTTP::Headers' ),
                 '_msg' => 'Can\'t connect to <url>',
                 '_request' => bless( {
                                        '_content' => '',
                                        '_uri' => bless( do{\(my $o = '<url>')}, 'URI::https' ),
                                        '_headers' => bless( {
                                                               'user-agent' => 'libwww-perl/6.04'
                                                             }, 'HTTP::Headers' ),
                                        '_method' => 'GET'
                                      }, 'HTTP::Request' )
               }, 'HTTP::Response' );


##</code><code>##

WWW::Mechanize: 1.71
LWP : 6.04