Uz pomoc modula LWP::UserAgent. imas info na search.cpan.org.
#!/usr/bin/perl
use LWP::UserAgent;
$ua = new LWP::UserAgent;
$ua->agent("Ventura browser");
$adresa = "
http://www.yahoo.com/";
$req = new HTTP::Request 'GET' => $adresa;
$req->header('Accept' => 'text/html');
$res = $ua->request($req);
if ($res->is_success) {
$file = $res->content;
} else {
print "Error: " . $res->code . " " . $res->message;
}
print "$file\n";
[
Ovu poruku je menjao ventura dana 04-13-2001 u 03:27 PM GMT]