Хелп, реконнект Lwp

Тема в разделе "Perl программирование", создана пользователем Riddick, 23 июн 2007.

Статус темы:
Закрыта.
  1. Riddick

    Riddick Гость

    Есть скрипт работающий с одним сервисом. Сервис тормозной и поэтому не всегда есть коннект, а если есть то бывает, что сколько не выставляй таймаут все равно не получается получить данные, пишет таймаут, а как сделать реконнект никак не дойдет до меня. Вот скрипт:
    Код (Text):
    #Изначальные данные

    sub Geturl{

    $browser = LWP::UserAgent->new;
    $response = $browser->get( $url );
    $get = $response->status_line;

    die "Can't get $url -- ", $response->status_line
    unless $response->is_success;

    $html = $response->content;

    }

    # Обработка полученных данных
    Так вот если коннект есть все нормально работает, если нет выводит ошибку соединения, подскажите как сделать реконнект.
    Заранее спасибо!
     
  2. Vovochka

    Vovochka Гость

    Чего-то я вообще не воткнул в задачу...
    Какой реконект?
    Чем тебе while не подходит?
    Долбился бы туды, пока не плолуил что хотел...
    Точнее монжно задачу?
     
Загрузка...
Статус темы:
Закрыта.

Поделиться этой страницей