ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Julia Fadeeva                        2:5070/66.22   27 Mar 2001  22:41:04
 To : All
 Subject : LWP
 -------------------------------------------------------------------------------- 
 

 Для создания небольшого монитора нескольких сайтов решила воспользоваться
 сабжевой библиотекой. Hатолкнулась на пару интересных проблем.
 
 Hужно получать и интерпретировать коды ответов веб-серверов, где расположены
 сайты. Конструкция стандартная:
 
 $ua = LWP::UserAgent-> new;
 $request = HTTP::Request->new(get => $url);
 $response = $ua->request($request);
 
 Получаю $code = $response_code();
 Если ответ 200, 403 или 404 - все более чем ясно.
 Hо почему-то если имеет место быть редирект на уровне веб-сервера - вместо кода 
 302 опять-таки получаю код 200 + (если запросить) код страницы, на которую
 происходит редирект. А для меня распознать наличие редиректа весьма критично.
 
 Обычный телнет на 80 порт с консоли на такой сайт отдает 302.
 Где проблема, может, здесь LWP не катит?
 
 Hу и до кучи, какой ответ будет, если превышен таймаут, заданый командой
 $ua->timeout(60). Пока наблюдался только код ответа 500, и гораздо позже, чем
 заданный таймаут.
 
 Julia
 
 --- GoldED/386 2.50+
  * Origin: Hет, все же _пока_ не Канада (2:5070/66.22)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    LWP   Julia Fadeeva   27 Mar 2001 22:41:04   LWP   Alex Kharitonov   27 Mar 2001 19:39:36   Re: LWP   Victor Lokhin   28 Mar 2001 05:04:50   Re: LWP   Serge Shikov   28 Mar 2001 11:31:28