>>111

use LWP::Simple;
$html = get "http://www.perl.com/";

or

use LWP::UserAgent;
$html = wget("http://www.perl.com/");
sub wget
{
my $url = shift;
my $request = new HTTP::Request(GET => $url);
my $ua = new LWP::UserAgent;
my $response = $ua->request($request);
if ($response->is_success) {
return $response->content;
} else {
return undef
}
}

cf. http://search.cpan.org/author/GAAS/libwww-perl-5.68/