Исходное сообщение
"Простой Perl-сценарий для переключения маршрутов на резервны..." Отправлено XoRe, 02-Май-09 01:23
2автор: Хороший скрипт. Ещё могу посоветовать посмотреть в сторону распараллеливания пингов. Чтобы не ждать <количество пингуемых точек> * <количество пингов> секунд. Сам в свое время сделал так: shell скрипт в цикле запускает пинги командой "ping ... $ip > /file.$ip &" Ждет нужное количество секунд и извлекает информацию из всех файлов разом. Таким образом опрашивалось 7 точек по 25 пингов каждые 40 секунд. В perl можно посмотреть в сторону fork или в сторону threads. Я бы ещё предложил system("ping $ip &"), но понимаю, что это не по фен-шую)