|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Yury Kopyl 2:5020/400 05 Feb 2004 23:14:51 To : Roman V Tchemisov Subject : Re: Работа через прокси-сервер -------------------------------------------------------------------------------- Roman V Tchemisov -> "Работа через прокси-сервер" : RV> Доброго времени суток, уважаемый All! RV> Проблемы с работой через прокси-сервер. Есть такой рабочий код: RV> use LWP::UserAgent; RV> my $uri = 'http://www.dsi.ru/'; RV> my $uname = 'login'; RV> my $pass = 'password'; RV> my $ua = LWP::UserAgent->new; RV> my $req = HTTP::Request->new(GET => $uri); RV> $ua->agent('Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)'); RV> $ua->proxy(['http', 'ftp'], 'http://proxy.iriit:3128/'); RV> $req->proxy_authorization_basic($uname, $pass); RV> my $res = $ua->request($req); RV> Всё бы хорошо, но в каждом новом запросе я должен делать: RV> $req->proxy_authorization_basic($uname, $pass); RV> а это не очень удобно. RV> Как мне прописать авторизацию на уровне пользовательского агента? сделай класс, где это будет инкапсулировано. Yury Kopyl aka hrg | http://id.totem.ru | "мы не пьем - мы лечимся..." --- ifmail v.2.15dev5.3 * Origin: IAC Samara-Internet, Ltd. (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/102774035da13.html, оценка из 5, голосов 10
|