作者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