getURL.. сокеты.. proxy.. need help :(((

[WD`]

помогите пжалста

тут были примеры SPV по работе с сокетами нашел в хелпе и LPW или LWP.. как его там величать..

задача в следующем:
надо взять из инета страничку.. но не выходит, т.к. работаю через прокси. подскажите как осуществить это ?

когда работал через модем все ок было.. а вот как указать прокси?

[adelante]

===============
myXML = new XML();
myXML.load("http://www.localserver.com/proxy.cfm?location=http://www.remoteserver.com/somedoc.xml");
и т.д

[Crazy]

А теперь -- правильный ответ:

my $ua = LWP::UserAgent->new;
$ua->proxy(...

[WD`]

2 adelante:
10x, попробую..

2 Crazy:
big 10x


-----
кому не хватит гениального ответа Крэйзи.. тут полный
#!/usr/bin/perl

use LWP::UserAgent;

print "Content-type: text/html\n\n";
require LWP::UserAgent;
$ua = LWP::UserAgent->new;
$ua->proxy(['http', 'ftp'], 'http://192.0.1.2:8080');
$req = new HTTP::Request('GET' => 'http://www.google.com');
$res = $ua->request($req);
$content = $res->content;
$res = $ua->request($req);
if($res->is_success) # успешно выполненный запрос
{
print $content;
}