форумы  помощь  поиск  регистрация  майллист  вход/выход  слежка

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

"awk perl"

Сообщение от alexlp (ok) on 07-Окт-07, 20:45

подскажите как выполнить перлом программу awk используя a2p ipfw show 32 | awk '{ print $3}'

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

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

[Сортировка по времени | RSS]

1. "awk perl"

Сообщение от Skif (ok) on 07-Окт-07, 22:17

>подскажите как выполнить перлом программу awk используя a2p > >ipfw show 32 | awk '{ print $3}' Если я вас правильно понял, то так: #!/usr/bin/perl -w $comres = `ipfw show 32`; print "$comres\n"; $comres =~ s/[\s\t]+/\t/g; print "$comres\n"; @arr = split(/\s/,$comres); print "$arr[2]\n"; или так: print `ipfw show 32| awk \'{ print \$3}\'`; Если нет - то увы...

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

	2. "awk perl"
	Сообщение от alexlp (ok) on 07-Окт-07, 23:17
	>[оверквотинг удален] >print "$comres\n"; > >@arr = split(/\s/,$comres); >print "$arr[2]\n"; > >или так: > >print `ipfw show 32| awk \'{ print \$3}\'`; > >Если нет - то увы... большое спасибо
	Высказать мнение | Ответить | Правка | Наверх | Cообщить модератору

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