如何用perl 在TXT文件中在第一列插入数值并删除 固定列后面其他的数值
1个回答
展开全部
!#usr/bin/perl -w
use strict;
my $file=shift;
open IN,"<",$file;
while(<IN>){
my @line=split/\t/,$_;
print "插入数值\t$line[0]\$line[1]\n"#不输出固定列后面的数值即可
}
use strict;
my $file=shift;
open IN,"<",$file;
while(<IN>){
my @line=split/\t/,$_;
print "插入数值\t$line[0]\$line[1]\n"#不输出固定列后面的数值即可
}
更多追问追答
追问
不好意思 我是新手 能再详细点么 我在插入数值那 写入数值 “1” 后面 “0” 和“1”那写我要不输出的列的列数是么??? 但是在哪加入我要改写的文本文件啊??? 是在"<"把这个改成我的文件名么????
追答
是要写你输出的列数 不输出的不写就可以了
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询