| 1.1, XoRe (ok), 01:23, 02/05/2009 [ответить]
| +/– | |
2автор:
Хороший скрипт.
Ещё могу посоветовать посмотреть в сторону распараллеливания пингов.
Чтобы не ждать <количество пингуемых точек> * <количество пингов> секунд.
Сам в свое время сделал так:
shell скрипт в цикле запускает пинги командой "ping ... $ip > /file.$ip &"
Ждет нужное количество секунд и извлекает информацию из всех файлов разом.
Таким образом опрашивалось 7 точек по 25 пингов каждые 40 секунд.
В perl можно посмотреть в сторону fork или в сторону threads.
Я бы ещё предложил system("ping $ip &"), но понимаю, что это не по фен-шую)
| | |
| |
| 2.3, mr_gfd (?), 12:52, 02/05/2009 [^] [^^] [^^^] [ответить]
| +/– |
Во фряхе перл системный без тредов собран по дефолту. С форками - гемора было бы больше, чем толку, ИМХО.
| | |
| |
| 3.6, XoRe (ok), 15:53, 03/05/2009 [^] [^^] [^^^] [ответить]
| +/– |
>Во фряхе перл системный без тредов собран по дефолту. С форками -
>гемора было бы больше, чем толку, ИМХО.
Да, без тредов.
А насчет гемора - смотря какие приоритеты.
Если приоритет, чтобы работало быстро, важнее лени, то программист заморочится.
| | |
|
| 2.4, Ilya Evseev (?), 13:16, 02/05/2009 [^] [^^] [^^^] [ответить]
| +/– |
 В fallback-gw пинг работает до первого ответа,
поэтому ждать придётся только в случае отказа,
который бывает не каждый месяц.
В нормальной ситуации всё отрабатывает мгновенно.
| | |
| |
| 3.7, XoRe (ok), 15:56, 03/05/2009 [^] [^^] [^^^] [ответить]
| +/– |
>В fallback-gw пинг работает до первого ответа,
>поэтому ждать придётся только в случае отказа,
>который бывает не каждый месяц.
>В нормальной ситуации всё отрабатывает мгновенно.
Да, вижу.
Тогда у нас с вами были немного разные цели.
В моем случае ещё был такой фактор, как процент потерь в канале.
| | |
|
|
| 1.5, q (??), 21:18, 02/05/2009 [ответить]
| +/– |
Советую использовать perlcritic и книгу Perl Best Practices для доработки скрипта.
| | |
|
