Я пытаюсь выполнить асинхронные запросы с использованием HTTP-модуля Perl AnyEvent со следующим кодом.Perl AnyEvent бросает ошибку HTTP 595
my $headers = {
'Accept' => 'text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8',
'Accept-Language'=> 'en-us,en;q=0.5',
'Connection' => 'keep-alive'
};
$request = http_request (
GET => "$url",
timeout => 5, # seconds
# persistent => 1,
# keepalive => 1,
headers => $headers,
proxy => $proxyRef,
sub {
my ($body, $hdr) = @_;
}
);
я получаю следующий ответ из запроса:
{
'Reason' => 'Connection timed out',
'URL' => 'url requested',
'Status' => 595
};
Я проверка AnyEvent Документацию причины этой ошибки, но не увенчались успехом с этим. Не могу найти другие полезные темы по этой проблеме, кроме предложений повторить попытку с тайм-аутом, что дает тот же результат. Простой «wget» работает с одним и тем же URL и его живым. Может ли кто-нибудь указать, как отладить эту проблему?
Что произойдет, если вы увеличите время ожидания до 50? – ikegami
такой же результат даже тогда! –
Как вы начинаете цикл событий? $ request не 'my'-ed, он используется в другом месте? Это очень помогло бы, если бы ваш образец кода был фактически минимальным исполняемым скриптом. – Dallaylaen