在網路測試中，ping是很常用的，ping一段時間，列印如下的log
64 bytes from 10.0.101.209: icmp_seq=1 ttl=64 time=1.10 ms
64 bytes from 10.0.101.209: icmp_seq=331 ttl=64 time=1.98 ms
64 bytes from 10.0.101.209: icmp_seq=800 ttl=64 time=1.30 ms
64 bytes from 10.0.101.209: icmp_seq=290 ttl=64 time=1.30 ms
64 bytes from 10.0.101.209: icmp_seq=975 ttl=64 time=1.23 ms
64 bytes from 10.0.101.209: icmp_seq=935 ttl=64 time=1.17 ms
64 bytes from 10.0.101.209: icmp_seq=8 ttl=64 time=1.42 ms
64 bytes from 10.0.101.209: icmp_seq=825 ttl=64 time=1.58 ms
64 bytes from 10.0.101.209: icmp_seq=3 ttl=64 time=1.32 ms
64 bytes from 10.0.101.209: icmp_seq=1 ttl=64 time=1.00 ms
64 bytes from 10.0.101.209: icmp_seq=999 ttl=64 time=1.23 ms
64 bytes from 10.0.101.209: icmp_seq=986 ttl=64 time=1.21 ms
64 bytes from 10.0.101.209: icmp_seq=1 ttl=64 time=1.08 ms
64 bytes from 10.0.101.209: icmp_seq=5 ttl=64 time=1.28 ms
如果檔案為ping.log，想查詢top 5 延時，下面一行可以搞定
[root@test5 ~]# perl -ne 'begin if(/time=([\d\.]+)/ and $1>$arr[0]) end ' ping.log
1.30
1.30
1.32
1.42
1.58
Perl基礎學習06之perl一行式
目錄 一行式選項 特殊字元 例1 每一行後面加空行 例2 每一行後加空行，空行除外 例3 連續輸出多個相等字元 例4 行前加空行 例5 輸出非空行 例6 移除單詞間所有空白 例7 每行單詞間連續空白壓縮為單空格 例8 原地修改拷貝 例9 所有行行號 例10 非空行行號遞增，全部輸出 例11 非空行行...
做一行愛一行
2013年9 月30日13 04 34 地點 公司 筆者 小菜 it界高手很多，謙虛進步自己 目前適合 android iphone 在除錯階段 內容 今天是九月的最後一天了，也沒有太多的心思的編寫 了，看看這個月的工作效率，確實不是很高。最近也在看一本書，可能很多的博友都知道這本書的 程式設計師你...
彙總查詢資料到一行
示例表 tb 資料如下 id value 1 aa 1 bb 2 aaa 2 bbb 2 ccc 第一種 select id,val select value from tb as b where b.id a.id forxml path from tb asa 第一種顯示結果 1 aa,bb,1...