The OpenNET Project / Index page

[ новости /+++ | форум | теги | ]

форумы  помощь  поиск  регистрация  майллист  ВХОД  слежка  RSS
"Как пропинговать компьютер в перле ?"
Вариант для распечатки  
Пред. тема | След. тема 
Форумы Программирование под UNIX (Public)
Изначальное сообщение [Проследить за развитием треда]

"Как пропинговать компьютер в перле ?"  
Сообщение от XPurple email(ok) on 14-Мрт-06, 11:38 
Как пропинговать компьютер в перле c сохранением результата в log-файле?
Правка | Высказать мнение | Ответить | Cообщить модератору | Наверх

 Оглавление

Сообщения по теме [Сортировка по времени, UBB]


1. "Как пропинговать компьютер в перле ?"  
Сообщение от idle (ok) on 14-Мрт-06, 17:57 
>Как пропинговать компьютер в перле c сохранением результата в log-файле?
system(), exec(), `...`

Правка | Высказать мнение | Ответить | Cообщить модератору | Наверх

2. "Как пропинговать компьютер в перле ?"  
Сообщение от allez (ok) on 14-Мрт-06, 21:32 
>Как пропинговать компьютер в перле c сохранением результата в log-файле?

perldoc Net::Ping


Правка | Высказать мнение | Ответить | Cообщить модератору | Наверх

3. "Как пропинговать компьютер в перле ?"  
Сообщение от XPurple email(ok) on 17-Мрт-06, 12:20 
>perldoc Net::Ping
Спасибо, все получилось

Правка | Высказать мнение | Ответить | Cообщить модератору | Наверх

6. "Как пропинговать компьютер в перле ?"  
Сообщение от XPurple email(ok) on 26-Апр-06, 08:04 
>>perldoc Net::Ping
>Спасибо, все получилось
В примере, который находится в perldoc, приводятся разные состояния alive|reachable| not reachable и параметры функции ping($host),ping($host,2). Требуется определять состояние удаленного маршрутизатора, т.к. с ним случаются зависания и плюс неустойчивая связь.
Чем отличаются состояния alive от reachable, not alive от not reachable ?

Правка | Высказать мнение | Ответить | Cообщить модератору | Наверх

7. "Как пропинговать компьютер в перле ?"  
Сообщение от XPurple email(ok) on 28-Апр-06, 14:04 
>>>perldoc Net::Ping
>>Спасибо, все получилось
>В примере, который находится в perldoc, приводятся разные состояния alive|reachable| not reachable
>и параметры функции ping($host),ping($host,2). Требуется определять состояние удаленного маршрутизатора, т.к. с
>ним случаются зависания и плюс неустойчивая связь.
>Чем отличаются состояния alive от reachable, not alive от not reachable ?
И еще небольшой вопрос: Какой смысл вкладывается в параметр timeout? Зачем, как вы считается, делается таймаут именно 2 сек ?

use Net::Ping;

           $p = Net::Ping->new();
           print "$host is alive.\n" if $p->ping($host);
           $p->close();

           $p = Net::Ping->new("icmp");
           foreach $host (@host_array)
           {
               print "$host is ";
               print "NOT " unless $p->ping($host, 2);
               print "reachable.\n";
               sleep(1);
           }
           $p->close();

           $p = Net::Ping->new("tcp", 2);
           while ($stop_time > time())
           {
               print "$host not reachable ", scalar(localtime()), "\n"
                   unless $p->ping($host);
               sleep(300);
           }
           undef($p);

           # For backward compatibility
           print "$host is alive.\n" if pingecho($host);


Правка | Высказать мнение | Ответить | Cообщить модератору | Наверх

4. "Как пропинговать компьютер в перле ?"  
Сообщение от Heggi email on 20-Мрт-06, 01:32 
>Как пропинговать компьютер в перле c сохранением результата в log-файле?

А как тоже самое сделать на Си ?
exec() не предлагать...

Правка | Высказать мнение | Ответить | Cообщить модератору | Наверх

5. "Как пропинговать компьютер в перле ?"  
Сообщение от chip email(ok) on 20-Мрт-06, 11:10 
>>Как пропинговать компьютер в перле c сохранением результата в log-файле?
>
>А как тоже самое сделать на Си ?
>exec() не предлагать...

http://www.freebsd.org/cgi/cvsweb.cgi/src/sbin/ping/ping.c

Правка | Высказать мнение | Ответить | Cообщить модератору | Наверх

Архив | Удалить

Индекс форумов | Темы | Пред. тема | След. тема
Оцените тред (1=ужас, 5=супер)? [ 1 | 2 | 3 | 4 | 5 ] [Рекомендовать для помещения в FAQ]




Партнёры:
PostgresPro
Inferno Solutions
Hosting by Hoster.ru
Хостинг:

Закладки на сайте
Проследить за страницей
Created 1996-2025 by Maxim Chirkov
Добавить, Поддержать, Вебмастеру