使用awk 取 ip 地址

我是DBA

原帖由 ynchnluiti 于 2008-12-24 01:49 發(fā)表

那我再多寫(xiě)一個(gè).
awk 'sub(//,""&&$0=$NF' urfile

這樣寫(xiě)好理解一點(diǎn)
awk 'sub(//,"" { print $4 }'

ynchnluiti

原帖由 moartel 于 2008-12-24 09:29 發(fā)表


學(xué)習(xí).
sub(//,""   替換
$0=$NF    賦值

這樣理解對(duì)嗎?

對(duì)的

ynchnluiti

原帖由 我是DBA 于 2008-12-24 09:41 發(fā)表

這樣寫(xiě)好理解一點(diǎn)
awk 'sub(//,"" { print $4 }'

被別人寫(xiě)了

nuclearxin

awk '/ports on/{print gensub(/:/,"",1,$4)}'

blackold

練一個(gè)：

1. awk --posix -v RS="[ ]|:\n" '/([0-9]+\.){2,}/' urfile

復(fù)制代碼

我是DBA

原帖由 愛(ài)知 于 2008-12-23 22:46 發(fā)表
awk -F: 'NR != 1{print $1}' RS="ports on" ufile

學(xué)習(xí)了一下RS的使用
記錄分隔

nuclearxin

都說(shuō) perl 處理文本最強(qiáng)
能給個(gè)例子 嗎 比如處理這個(gè)

ly5066113

perl -lne 'print $1 if /([0-9.]+)/' urfile

perl的正則表示式是最強(qiáng)大的。

隨風(fēng)漂

awk 'if(gsub(/.* ([0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}).*/,"\\1",$0)>0) print $0}' urfile

ynchnluiti

原帖由 ly5066113 于 2008-12-24 14:16 發(fā)表
perl -lne 'print $1 if /([0-9.]+)/' urfile

perl的正則表示式是最強(qiáng)大的。

Tim最近在進(jìn)修Perl吧