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

Вариант для распечатки		Архивированная нить - только для чтения!  Пред. тема | След. тема
Форумы OpenNET: Виртуальная конференция (Public)
Изначальное сообщение		[Проследить за развитием треда]

"Помогите перевести код в шелл с перла"
Сообщение от Roman Y. Bogdanov on 12-Янв-04, 11:46  (MSK)
Помогите перевести это из перла в шелл. У меня роутер на CompactFlash карточке под FreeBSD. Ставить ради одной строчки перл на роутер с 40 мегами диска - не имею возможности. Спасибо. tail -F /var/log/all.log | perl -ne 'if (/ Portscan detected from ([\d\.]+)/) { `sh /1.sh $1`;}'
	Рекомендовать в FAQ | Cообщить модератору | Наверх

Индекс форумов | Темы | Пред. тема | След. тема

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

1. "Помогите перевести код в шелл с перла"
Сообщение от Roman Y. Bogdanov on 12-Янв-04, 11:54  (MSK)
>Помогите перевести это из перла в шелл. У меня роутер на CompactFlash >карточке под FreeBSD. Ставить ради одной строчки перл на роутер с >40 мегами диска - не имею возможности. Спасибо. > >tail -F /var/log/all.log | perl -ne 'if (/ Portscan detected from ([\d\.]+)/) >{ `sh /1.sh $1`;}' Подсказали: while read a ; do echo "$a" |grep "whatineed" ; done Спасибо.
	Рекомендовать в FAQ | Cообщить модератору | Наверх

Удалить

Индекс форумов | Темы | Пред. тема | След. тема

Пожалуйста, прежде чем написать сообщение, ознакомьтесь с данными рекомендациями.