#/usr/bin/perl

use strict;
use warnings;
use LWP::Useragent;

my $ua = LWP::UserAgent->new(
    keep_alive => 1,
    ssl_opts => { verify_hostname => 1 },
);