作者abliou (把青春freeze)
看板Perl
标题Re: [问题] 转格式问题
时间Mon Jun 2 13:15:23 2008
※ 引述《kazusn ()》之铭言：
: ,ProberX# ,ProberY#
: ,69 ,1
: ,70 ,1
: ,71 ,1
: ,72 ,1
: 上面格式要转成如下格式
: die 69 1
: die 70 1
: die 71 1
: 请问各位高手 要用哪个指令才可以 感谢各位提示
: 谢谢
open f,"<aa.txt";
while(<f>){
/\s*,\d/?
s/\s*,/ /g
:next;
print "\ndie$_";
}
很直观的写法...不过如果用map初步估计连开档关档三行能搞定吧...
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 122.123.199.3