作者senjyu (刃)
看板Perl
標題[問題] 數據變換再重新排序
時間Thu Aug 21 08:52:36 2008
小弟現在手上有一個檔案,是測試的TEST PATTERN
Pattern的格式如下
900001 U00o111oU010LLLHLLLHH1HLLLHLLLHH1HLHHHHL
.
.
.
.
.
1800000 U00/111/U010LLLLLLLLH1HLLLLLLLLH1lLHHHLL
一共90萬行
數字的部份是cycle number,後面那堆U000o..etc是給測試機台吃的pattern
但是由於轉換程式沒辦法定義'900001',必須從1開始
所以必須把前面的數字從'900001'到'1800000',換成'1'到'900000'
只能夠變動前面的數字,後面的pattern不能夠變動
試過用vi換,但是每10萬個cycle就必須替換一次
請問板上高手,如果要用perl處理,程式該怎麼寫@@?
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 69.3.185.16
1F：推 Andor:awk '{$1-=900000; print}' file 08/21 09:45
2F：→ Andor:或 perl -ape '$F[0]-=900000; $_="@F\n"' file 08/21 09:46