require LWP::UserAgent;
$ua = LWP::UserAgent->new;
$ua->proxy('http', 'http://proxy.sn.no:8001/');
$request = HTTP::Request->new('GET', 'http://www.perlmonks.org');
$response = $ua->request($request);