Shell如何写合并如下的文件?

weidi

file1的内容

a1  bb1 cc1  dd1
a2  bb2 cc2  dd2
a3  bb3 cc3  dd3
a4  bb4 cc4  dd4


file2的内容

  bb3   tt1
  bb2   tt4
  bb1   tt3
  bb4   tt2

通过shellc能如何得到file3呢?

a1  bb1 cc1  dd1  tt3
a2  bb2 cc2  dd2  tt4
a3  bb3 cc3  dd3  tt1
a4  bb4 cc4  dd4  tt2

guochunning

awk 'BEGIN{while("cat 'file1'"|getline d){split(d,key," ");i++;t1[i]=key[1];t2[i]=key[2];t3[i]=key[3];t4[i]=key[4];}}{for(j=0;j<=i;j++){if($1==t2[j]) print t1[j],t2[j],t3[j],t4[j],$2}}' file2

ywclouds

while read ka kb kc kd
do
echo "$ka $kb $kc $kd `grep $kb file2| awk '{ print $2}'`" >> file3
done < file1

weidi

谢谢楼上的..试试哈..

awk就是awp加ak

awk '
FILENAME=="s1" {
        buf[count1++] = $0;
}
FILENAME=="s2" {
        print buf[count2++]$NF;
}
' s1 s2

weidi

其实我的file1和file2都是行数很大的文件..


不知效率如何?

awk就是awp加ak

先试一下呗，不行再说

guochunning

原帖由 awk就是awp加ak 于 2006-10-31 16:38 发表
awk '
FILENAME=="s1" {
        buf[count1++] = $0;
}
FILENAME=="s2" {
        print buf[count2++]$NF;
}
' s1 s2

awk 'FILENAME=="file1" {buf[$2] = $0;}FILENAME=="file2" {print buf[$1],$NF;}' file1 file2

lovesaka

以前的类似问题
http://bbs.chinaunix.net/viewthread.php?tid=836775
http://bbs.chinaunix.net/viewthread.php?tid=836018
perl的新版本

1. 
   
2. perl -e '@file1=`file1`;@file2=`cat file2`;foreach(@file1){$tmp=$_;@arry=split(/\s+/);foreach(@file2){if(/$arry[1]/){@arry1=split(/\s+/);chomp($tmp);print "$tmp $arry1[1]\n"}}}'
   

复制代码

ziyiu123

呵呵，收下。