форумы  помощь  поиск  регистрация  майллист  ВХОД  слежка

Вариант для распечатки		Пред. тема | След. тема
Форумы Программирование под UNIX (Public)
Изначальное сообщение		[Проследить за развитием треда]

"perl возврат строки"

Сообщение от creapt (ok) on 08-Май-07, 16:26

Имеется #!/usr/bin/perl $i=200; open(ip, "</usr/local/1"); while($name=<ip>)         {         $i++; $rrr="ipfw add $i deny ip from any to $name via rl0\n"; print "$rrr"; }; при выводе результата сносит строку ipfw add 201 deny ip from any to 192.168.1.2 via rl0 ipfw add 202 deny ip from any to 192.168.1.3 via rl0 ...... и т д нужно чтобы было ipfw add 201 deny ip from any to 192.168.1.2 via rl0 ipfw add 202 deny ip from any to 192.168.1.3 via rl0 ..... и т д подскажите пожалуйста с помощью чего это можно реализовать.

Высказать мнение | Ответить | Правка | Наверх | Cообщить модератору

Сообщения по теме

[Сортировка по времени, UBB]

1. "perl возврат строки"

Сообщение от gibbon (??) on 08-Май-07, 19:00

>Имеется >#!/usr/bin/perl >$i=200; >open(ip, "</usr/local/1"); >while($name=<ip>) >        {          chop $name; >        $i++; >$rrr="ipfw add $i deny ip from any to $name via rl0\n"; >print "$rrr"; >}; > >при выводе результата сносит строку >ipfw add 201 deny ip from any to 192.168.1.2 > via rl0 >ipfw add 202 deny ip from any to 192.168.1.3 > via rl0 >...... и т д

Высказать мнение | Ответить | Правка | Наверх | Cообщить модератору

2. "perl возврат строки"

Сообщение от creapt (ok) on 12-Май-07, 15:00

спасибо

Высказать мнение | Ответить | Правка | Наверх | Cообщить модератору

Архив | Удалить	Индекс форумов | Темы | Пред. тема | След. тема
Оцените тред (1=ужас, 5=супер)? [ 1 | 2 | 3 | 4 | 5 ] [Рекомендовать для помещения в FAQ]