Подскажите, как прервать выполнение запроса, когда сервер отвечает, но очень медленно.

В качестве примера привожу код в котором в функции делается несколько запросов гет. Пытаюсь прервать ее выполнение алармами, с таймаутом равным 1 секунде.



У меня результат такой:
ver. 1
3 s
ver. 2
2 s

Т.е видно, что аларм не срабатывает. 
Если в функции с запросами вставить sleep(2), то все отрабатывает как надо.

Как это побороть? Куда смотреть? Что читать?

Это сообщение отредактировал(а) Gigik - 19.9.2010, 10:09

У меня есть подозрение, что LWP у себя внутри зовёт alarm (классический способ повесить таймаут на вызов connect() - это как раз обернуть его в alarm()), что сбивает любые внешние настройки. Советую посмотреть на AnyEvent::HTTP, там это можно организовать как-то так:

use EV;
use AnyEvent;
use AnyEvent::HTTP;

my $timer = AnyEvent->timer(
  after => 1,
  cb     => sub {undef $guard},
);
my $guard = http_get ....; #при успехе - надо сбросить $timer

EV::Loop;

Это сообщение отредактировал(а) DurRandir - 19.9.2010, 16:11

Проверьте ваше подозрение и убедитесь что оно не верно.
LWP::UserAgent использует select для чтения из сокета, select позволяет задавать таймауты.
Кстати есть такое ощущение, что таймауты в LWP::UserAgent работают не всегда правильно..

Таймаут на выборку - да, таймаут на connect() - нет. Если не переводить сокет в неблокирующий режим, то для системного вызова connect() нельзя просто задать таймаут. Но вообще, в LWP::Protocol::http нет чего-то очень уже криминального, при этом задержка в 3 сек у меня воспроизводится. Ручной вызов connect()/select() alarm'ом нормально прерывается.

PS: там таймауты как написано работают - между 2мя чтениями из сокета. Т.е. это не глобальный таймаут.

Это сообщение отредактировал(а) DurRandir - 20.9.2010, 13:12

Точно!

Именно поэтому то я и использоватл eval / alarm для обработки timeout. 
А то запамятовал уже чем мне стандартный не подходил..