use strict;
require LWP::UserAgent;

my $ua = LWP::UserAgent->new(env_proxy => 1, keep_alive => 1, timeout => 30);
print "'\$ua = LWP . . . ' Errors: $@\n";

my $req = HTTP::Request->new('GET', 'http://www.somewhere.org/csc/file.exe');
print "'\$req = HTTP . . . ' Errors: $@\n";

$req->authorization_basic('login', 'password');
print "'\$req->author . . . ' Errors: $@\n";

my $resp = $ua->request($req, '/temp/file.exe');
print "'\$resp = \$ua-> . . . ' Errors: $@\n";

##</code><code>##

my $req = HTTP::Request->new('GET', 'http://www.somewhere.org/a/file.exe/');