$ua=LWP::UserAgent->new or die; 
$ua->cookie_jar(HTTP::Cookies->new(file => "lwpcookies.txt", autosave => 1));  
$ua->agent($userag); #определяем свойства
$ua->timeout(5);
$ua->proxy('http',"http://".$proxy_addr."/"); 

$h1 = new HTTP::Headers
Accept => 'application/vnd.ms-excel, application/msword, image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/x-comet, */*',
User_Agent => $userag,
Referer => $pageref;
$req1 = new HTTP::Request ('GET', $url, $h1);

$res=$ua->request($req1); 

print $res->content;