轉換文件到另一個文件通過Shell腳本

Question

我想下面的輸入文件（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.txt 

文件ABC 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 

是否有任何其他方式可以用更少的命令更快地完成它。

Answer 1

使用Perl：

perl -plne 's/#.*/.txt/;s/,"/,/;' file 

添加選項-i以便更新文件。

Answer 2

隨着SED：

sed 's/"\(TS.*\)#S10S#.txt.xml"/\1.txt/' input 

Answer 3

一個使用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.txt