2010-06-15 3 views
1

Итак, я пишу код, чтобы получить документ из Интернета. Размер документа составляет около 200 КБ. Это код:Perl: Значение кода ответа в HTTP :: Request

#!/usr/local/bin/perl -w 
use strict; 
use LWP::UserAgent; 
my $ua = LWP::UserAgent->new; 
my $url = "SOME URL"; 
my $req = HTTP::Request->new(GET => $url); 
my $res = $ua->request($req); 

if($res->is_success){ 
    print $res->content ."\n"; 
} 
else{ 
    print "Error: " . $res->status_line; 
} 

Теперь единственная проблема заключается в том, что я не могу сказать, что такое URL.

Однако выход: «Ошибка: 500 минут ожидания». Когда я проверил ссылку снаружи, данные загружаются менее чем за 5 секунд.

Я даже изменил таймаут на 1000, но он все еще не работает. Как мне найти дополнительную информацию, связанную с ответом? Размер файла (около 200 КБ) также недостаточно велик, чтобы гарантировать таймаут чтения. Сервер также не занят, не задавал проблем, когда я проверял ссылку в браузере.

Спасибо.

+0

Включен ли прокси? –

+0

Никакой прокси. Пробовал ссылку с помощью curl, и сообщение было: (52) пустой ответ с сервера. Итак, как мне узнать, отправляются ли данные, но не доставляются. Или сервер закрывает соединение преждевременно. В любом случае, почему статус «500 минут ожидания чтения»? – lola

ответ

0

Убедитесь, что веб-сервер не настроен на удаление запросов от скриптов в этом случае perl.

+2

Downvote для? Это одно, что нужно проверить. –

Смежные вопросы