我想把下面的输入文件(Abc)转换成输出文件(Xyz),如下所述:
$more abc
"2005057400BPI","TS.1.BPI.20121112120000.000#S10S#.txt.xml"
"2005057408BPI","TS.1.BPI.20121112120000.000#S10S#.txt.xml"
"2005057488BPI","TS.1.BPI.20121112120000.000#S10S#.txt.xml"
$more xyz
"2005057400BPI",TS.1.BPI.20121112120000.000.txt
"2005057408BPI",TS.1.BPI.20121112120000.000.txt
"2005057488BPI",TS.1.BPI.20121112120000.000.txtabc文件包含aorund 35k行。我将转换为:
$perl -pi -e 's/"//g' abc
$cut -d'.' -f1-5 abc > xyz
$perl -pi -e 's/.....$/\.txt/g' xyz
$perl -pi -e 's/#//g' xyz
$perl -pi -e 's/^/"/g' xyz
$perl -pi -e 's/,/",/g' xyz有没有其他方法可以用更少的命令更快地完成这项工作。
发布于 2012-11-29 15:37:36
使用Perl:
perl -plne 's/#.*/.txt/;s/,"/,/;' file添加选项-i以就地更新文件。
发布于 2012-11-29 15:33:10
使用sed:
sed 's/"\(TS.*\)#S10S#.txt.xml"/\1.txt/' input发布于 2012-11-29 15:35:33
使用sed的一种方式
sed 's/\(.*,\)"\([^#]*\).*/\1\2.txt/' file结果:
"2005057400BPI",TS.1.BPI.20121112120000.000.txt
"2005057408BPI",TS.1.BPI.20121112120000.000.txt
"2005057488BPI",TS.1.BPI.20121112120000.000.txthttps://stackoverflow.com/questions/13620773
复制相似问题