use strict;
use LWP::Simple;
use LWP::UserAgent;
my $webpage = "http://www.google.com";
my $ua = LWP::UserAgent->new;
$ua->agent("Mozilla/4.76 [en] (Windows NT 5.0; U)");
$ua->timeout(30);
my $request = HTTP::Request->new('GET', $webpage);
my $response = $ua->request($request);
my $html = $response->content;
print $html;
exit(0);