use LWP::UserAgent;
use HTTP::Request::Common;

my $ua  = LWP::UserAgent->new;
my $req = GET $url;
my $res = $ua->request($req);

my $html = $res->content;