Traceroute в перл

Тема в разделе "Perl программирование", создана пользователем kukich, 15 фев 2011.

  1. kukich

    kukich Гость

    Привет.Вот мой код:
    Код (Text):
    #!/usr/bin/perl
    $SIG{ALRM}=
    sub{ print $trace;};
    alarm 20;
    $trace=`traceroute 89.179.112.0`;
    alarm 0;
    Задача следующая - есть адрес,надо посмотреть куда он уходит.Обычно в команде traceroute в конце идет ответ *** ,а это у меня не интересует.Хочу чтобы программа брала первые 20 секунд traceroute и выдавала мне их.А вместо этого она сначало выполняет 20 секунд traceroute ,а затем выполняет его еще раз для печати полностью,вместо того,чтобы напечатать что уже найдено.
    Может есть какой то еще способ по таймауту выдавать traceroute?
     
  2. arto

    arto Member

    Регистрация:
    21 июн 2006
    Сообщения:
    10
    Симпатии:
    0
    прибивайте сам процесс
     
Загрузка...
Похожие Темы - Traceroute перл
  1. Истребитель
    Ответов:
    1
    Просмотров:
    3.462

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