作者km305 (阿勒...)
看板Perl
標題[問題] 關於字串比對與其後面數字擷取
時間Fri Nov 28 17:53:26 2008
各位板上的高手大家好
我算是一個perl的新手
最近想要用perl處理一些數據的問題
不過一直遇到瓶頸 請各位高手幫幫忙
例如:
這是一份文件裡面的幾行文字
total time 154
....
total time 184
....
total time 198
.
.
.
.
有七份這個文件 每個裡面都有total time
我想要擷取每份文件其中的total time後面的數字
然後取總和再除以七做平均
請問要如何做呢??
我是先比對"total time"這個字串
然後在用substr從後面的幾行取出數字
可是因為total time重複很多次
每次都只比對到第一個而已...
請問要如何持續的往下比對?
不好意思 請各位高手多多指教!!
感謝各位~
--
^..^ ^. .^ ^..^ ^..^ ^..^ ^﹎^ ^..^ ^..^ ^qp^ ^cc^ ^@@^
(oo) ( o o ) (OO) (oo ) (@@) (oo) (00) (qp) (oo) (oo) (oo)
豬 肥豬 澎恰恰 牙痛 台灣 睡豬 黑暗中 仰泳中 感冒 哭泣 有斜視 近視
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.124.43.171
1F:→ giacch:for(@DATA) { /total time (\d+)/; print $1 . "\n"; } 11/28 18:34
2F:→ giacch:回太快修改一下... XD 11/28 18:35
3F:→ giacch:for(@DATA) { print $1 . "\n" if(/total time (\d+)/); } 11/28 18:35
4F:→ km305:那個時間可能是600多的也可以這樣用嗎? 11/28 22:32
5F:→ giacch:不先試一下嗎? 11/28 22:58