require LWP::UserAgent;
use Data::Dumper;
use strict;
use warnings;

my $res = LWP::UserAgent->new()->get('http://www.hopingthereisnosuchthing.com/ah');
print "return code = $res->{'_rc'}\n";
print "msg = $res->{'_msg'}\n";