|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Andrey Sapozhnikov 2:5020/400 14 Mar 2002 18:09:18
To : Artem Chuprina
Subject : Re: Пpокся мешает LWP
--------------------------------------------------------------------------------
Artem Chuprina wrote:
> Здравствуй, Alexey V. Polotnyanko.
>
> AVP> Есть код:
> AVP> #!/usr/bin/perl -w
>
> AVP> use LWP::UserAgent;
> AVP> use HTTP::Request;
>
> AVP> $ua = new LWP::UserAgent;
> AVP> $ua->agent("");
>
> AVP> $req = new HTTP::Request GET => 'http://yandex.ru';
> AVP> $req->content_type('text/html');
> AVP> $req->content('match=www&errors=0');
>
> AVP> $res = $ua->request($req);
>
> AVP> print $res->content;
>
> AVP> if ($res->is_success)
> AVP> {
> AVP> print $res->content;
> AVP> }
> AVP> else
> AVP> {
> AVP> print $!;
> AVP> }
>
> AVP> Когда делаю в локалке так - все здоpово, когда наpyжy - сквид отвечает,
> AVP> что pеквест y меня непpавильный и я послан... Кто-то сталкивался?
>
> rtfm на предмет слова proxy. По-моему, очевидно...
И еще R много других TFM. Hапример насчет того какие бывают
Content-Type у HTTP запросов, бывают ли при запросе GET
content и Content-Type, и почему переменная $! не содержит
ничего вразумительного в данном примере... А так же,
поинтересоваться можно ли в ->agent передавать пустую строку
и к чему это приведет.
Андрей
--- ifmail v.2.15dev5
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
Re: Пpокся мешает LWP 