use LWP::UserAgent;
use Data::Dumper;

my $domain = 'http://blah.com';

my $ua = LWP::UserAgent->new;
$ua->agent('Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; Reading Logs - You must be bored ;-)');

# use proxy....
my $proxy   = 'http://some.proxy.au:8080';
$ua->proxy( 'http', $proxy );

# or don't use proxy......
$ua->no_proxy($domain,...)

my $request = HTTP::Request->new( 'GET', $URL );
my $response = $ua->request( $request );
print Dumper $response;