The LWP library is your friend:

use LWP::UserAgent;
$ua = new LWP::UserAgent;
$req = new HTTP::Request (GET => 'http://my.webpage.org/keepout');
$req->authorization_basic('username', 'password');

# do what you want here:
print $ua->request($req)->as_string;
[download]