Исходное сообщение
"Статические маршруты через isc-dhcpd" Отправлено Aleon, 03-Фев-06 05:56
То же самое, но более кратко... #!/usr/local/bin/perl -w use strict; while (<>) { /(\d+)\.(\d+)\.(\d+)\.(\d+)\/(\d+)\s(\d+)\.(\d+)\.(\d+)\.(\d+)/ or next; printf("%02x:%02x:"."%02x:"x($5/8.125), $5, $1,$2,$3,$4 );     # Don't ask me how it works;-) printf("%02x:%02x:%02x:%02x".(!eof && ":"), $6,$7,$8,$9 ); } print "\n"; Скрипту в качестве параметра скармливается файл вида: #subnet         gateway 10.0.0.0/8      192.168.0.1 172.16.0.0/12   192.168.0.1 192.168.0.0/16  192.168.0.1

Ваше сообщение
Имя*:
EMail:	Для отправки ответов на email укажите знак ! перед адресом, например, !user@host.ru (!! - не показывать email). Более тонкая настройка отправки ответов производится в профиле зарегистрированного участника форума.
Заголовок*:
Сообщение*:	> То же самое, но более кратко... > #!/usr/local/bin/perl -w > use strict; > while (<>) { > /(\d+)\.(\d+)\.(\d+)\.(\d+)\/(\d+)\s(\d+)\.(\d+)\.(\d+)\.(\d+)/ or next; > printf("%02x:%02x:"."%02x:"x($5/8.125), $5, $1,$2,$3,$4 ); # Don't ask > me how it works;-) > printf("%02x:%02x:%02x:%02x".(!eof && ":"), $6,$7,$8,$9 ); > } > print "\n"; > Скрипту в качестве параметра скармливается файл вида: > #subnet gateway > 10.0.0.0/8 192.168.0.1 > 172.16.0.0/12 192.168.0.1 > 192.168.0.0/16 192.168.0.1
	Введите код, изображенный на картинке: