我有大量的文件(大约500个).每个文件包含两列.每个文件的第一列相同.我想使用gawk将所有文件合并到一个文件中.
例如,
File 1
a 123
b 221
c 904
Run Code Online (Sandbox Code Playgroud)
File 2
a 298
b 230
c 102
Run Code Online (Sandbox Code Playgroud)
等等.我想要一个如下所示的最终文件:
Final file
a 123 298
b 221 230
c 904 102
Run Code Online (Sandbox Code Playgroud)
我找到了可以连接两个文件的脚本,但我需要加入多个文件.
我有一个包含超过百个单列条目的文件.我需要将这些条目中的每一个搜索到一个包含多列和超过一千个条目的文件中,并且需要一个输出文件.我试过这些代码:
#!/usr/bin/perl -w
use strict;
use warnings;
print "Enter the input file name:";
my $inputfile = <STDIN>;
chomp($inputfile);
print "\nEnter the search file name:";
my $searchfile=<STDIN>;
chomp($searchfile);
open (INPUTFILE, $inputfile) || die;
open (SEARCHFILE, $searchfile) || die;
open (OUT, ">write.txt") || die;
while (my $line=<SEARCHFILE>){
while (<INPUTFILE>) {
if (/$line/){
print OUT $_;
}
}
}
close (INPUTFILE) || die;
close (SEARCHFILE) || die;
close (OUT) || die;
Run Code Online (Sandbox Code Playgroud)
输出文件只有一行.它已将搜索文件中的术语搜索到输入文件中,但仅限于第一个术语,而不是全部.请帮忙!