![]() |
getURL.. сокеты.. proxy.. need help :(((
помогите пжалста :)
тут были примеры SPV по работе с сокетами нашел в хелпе и LPW или LWP.. как его там величать.. задача в следующем: надо взять из инета страничку.. но не выходит, т.к. работаю через прокси. подскажите как осуществить это ? :) когда работал через модем все ок было.. а вот как указать прокси? |
Прокси
===============
myXML = new XML(); myXML.load("http://www.localserver.com/proxy.cfm?location=http://www.remoteserver.com/somedoc.xml"); и т.д |
А теперь -- правильный ответ:
Код:
my $ua = LWP::UserAgent->new; |
2 adelante:
10x, попробую.. 2 Crazy: big 10x :) ----- кому не хватит гениального ответа Крэйзи.. тут полный :D #!/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; } |
| Часовой пояс GMT +4, время: 18:00. |
Copyright © 1999-2008 Flasher.ru. All rights reserved.
Работает на vBulletin®. Copyright ©2000 - 2026, Jelsoft Enterprises Ltd. Перевод: zCarot
Администрация сайта не несёт ответственности за любую предоставленную посетителями информацию. Подробнее см. Правила.