my $res = $ua->request(HTTP::Request->new(GET => "http://www.yahoo.no"));
print $res;