|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Ilya Genkin 2:5083/21 31 May 2001 09:29:40 To : All Subject : Re: про ping -------------------------------------------------------------------------------- .RFC-X-Complaints-To: news@fido.online.kz .RFC-NNTP-Posting-Date: 31 May 2001 02:29:44 GMT .RFC-X-Priority: 3 .RFC-X-MSMail-Priority: Normal .RFC-X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4133.2400 Hi! > From: Andy Bogdanov <andy@andy.it.itn.ru> > вот такой вопрос - а есть ли какой модуль, позволяющий делать пинг из перлового > скрипта? не хочется звать system... use Net::Ping; $p = Net::Ping->new("icmp"); $host = "xxx.xxx.xxx.xxx"; print "$host is alive\n" if $p->ping($host, 2); > Bye! > Andy Bogdanov //andy@andy.it.itn.ru// ig --- Microsoft Outlook Express 5.50.4133.2400 * Origin: KazNet (ISP BBS) (2:5083/21@fidonet) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/121168fffec00.html, оценка из 5, голосов 10
|