Select Code to Download

$filename = 'file.zip'; # for example
use LWP::UserAgent;
...
$request = GET $url;
$response = $ua->request($request);
print "response:" . $response->code . "\n";

$ua->credentials('www.domain.com:80', '', 'user'=>'pass');