Select Code to Download

#!/usr/bin/perl -w

...

die "Couldn't get $url -- " ,$response->status_line
unless $response->is_success;

$browser->proxy([qw(http ftp)], 'http://google.com:80'

Address:Dialup
Port:80