use LWP::UserAgent;

# specify a CA path
my $ua = LWP::UserAgent->new();
my $response = HTTP::Request->new(GET => 'https://example.com/');

my $res = $ua->request($response)->as_string;
print $res