use LWP::Simple; use LWP::UserAgent; my $user = 'user'; my $pwd = 'password'; my $browser = LWP::UserAgent->new(); $browser->credentials('http://proxy.srvr.com:8080/','domain',$user=>$pwd); my $url = 'http://www.google.com'; my $response = $browser->get($url); print $response->header("Server"),"\n";