跪求perl程序,打开txt格式A文件,将其中空格替换为制表符,然后保存为excel格式的B文件

2025-05-15 15:29:30
推荐回答(1个)
回答(1):

#!/usr/bin/perl -w
use strict;
open IN,"C:\\perl\\A.txt"; #这个是你A文件的路径,注意路径中的\要用\\
open OUT,">C:\\perl\\B.xls"; #这个是你输出的B文件的路径,注意路径中的\要用\\
while(){
$_=~s/([ \t])+/\t/g; #将一行中的空格替换成制表符
print OUT $_;#输出替换后的内容
}
close IN;
close OUT;

以上为代码,有不明白的地方,欢迎追问。