[Perl] Как подправить таблицу маршрутизации?
От: Аноним  
Дата: 24.02.10 12:33
Оценка:
Требуется написать скрипт, анализирующий таблицу маршрутизации (конкретно — нужно узнать IP-адрес интерфейса, назначаемый динамически), и добавляющий пару маршрутов на этот интерфейс. Подскажите, в каком направлении копать? Конкретно интересуют следующие вопросы:

1) Как исполнить системную команду на Perl, и получить ее вывод для дальнейшей обработки?
2) Может есть готовый CPAN-модуль, предназначенный для этой цели?
Re: [Perl] Как подправить таблицу маршрутизации?
От: Бабошин Андрей Германия http://andreybaboshin.livejournal.com/
Дата: 24.02.10 15:35
Оценка:
А>1) Как исполнить системную команду на Perl, и получить ее вывод для дальнейшей обработки?
#!/usr/bin/perl

$result = `mycmd --with-args`;
print $result;
Re: [Perl] Как подправить таблицу маршрутизации?
От: Бабошин Андрей Германия http://andreybaboshin.livejournal.com/
Дата: 24.02.10 15:38
Оценка:
А>2) Может есть готовый CPAN-модуль, предназначенный для этой цели?
http://search.cpan.org/~dpates/IPTables-IPv4-0.98/
http://search.cpan.org/modlist/Networking_Devices_IPC
Re: [Perl] Как подправить таблицу маршрутизации?
От: Centaur Россия  
Дата: 01.03.10 13:03
Оценка:
Здравствуйте, Аноним, Вы писали:

А>Требуется написать скрипт, анализирующий таблицу маршрутизации (конкретно — нужно узнать IP-адрес интерфейса, назначаемый динамически), и добавляющий пару маршрутов на этот интерфейс. Подскажите, в каком направлении копать?


Тут надо не анализировать, а повесить хук на dhclient-script. Когда dhclient получит адрес, он вызовет dhclient-script, который вызовет все установленные хуки с определёнными значениями переменных среды. В том числе передаст все настройки, полученные от dhcp-сервера.

Кстати, в системе уже может быть готовый хук rfc3442-classless-routes. Может быть, будет достаточно скормить ему подходящую строку через supersede.
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.