怎么实现另一类文件和并

ppp_qqq

三个文件，file1分别与file2、file3有一对多的关系，关联点是第一列，现在需要将这三个文件合并：
file 1：
m  m1 m2 m3
n  n1 n2

file 2：
m  AA1
n  BB1
n  BB2
n  BB3
p  PP1

file 3：
m  CC1
m  CC2
n  DD1
n  DD2
q  QQ1

合成后效果：
m  m1 m2 m3 : AA1 | CC1,CC2 ;
n  n1 n2  : BB1,BB2,BB3 | DD1,DD2 ;


主要是对于下面这三点的解决办法没想明白
1、file2、file3中可能包括file1中没有的记录行
2、file2、file3中第一列重复的记录可能有任意行数
3、要把file2 file3中所有与file1对应的值都追加到file1对应的行尾，放在一行里

需要使用二维数组吗？还是需要与shell组合使用？
搜索了网上的示例，试图套写个awk语句，但发现例子都是拼成多行，类似join命令的效果，而不是写到一行里

请各位指点迷津，谢谢

blackold

awk

爱知

笨办法
试试
awk '
FILENAME=="file1"{a[$1]=$0 ":";next}
FILENAME=="file2"{ if($1 in a) a[$1]=a[$1] $2 ",";next}
FNR==1{for(n in a){sub(/,$/,"",a[n]);sub(/$/,"|",a[n];}}
{if($1 in a) a[$1]=a[$1] $2 ",";}
END{
     for(n in a){sub(/,$/,"",a[n];}print a[n] ";"}
    }
' file1 file2 file3

[ 本帖最后由 爱知 于 2008-9-4 12:13 编辑 ]

ly5066113

1. awk 'FILENAME==ARGV[ARGC-1]{j=1;printf $0" : ";while(j<i){printf a[j,$1]" | ";j++}print a[i,$1]" ;";next}FNR==1{i++}{a[i,$1]=a[i,$1]?a[i,$1]","$2:$2}' file2 file3 file1

复制代码

snake_blue

awk 'NR==FNR{t[$1]=$0":"}NR>FNR&&($1 in t){t[$1]=t[$1]"|"$2 }END{for(i in t)print i,t}' file1 file2 file3

[ 本帖最后由 snake_blue 于 2008-9-4 16:49 编辑 ]

snake_blue

4楼的是对的，我的有问题。4楼的哥们能否给解释一下{a[i,$1]=a[i,$1]?a[i,$1]","$22} 这个，是用三元操作符给a[i,$1]赋值吗？如果是的话a[i,$1]?这个应该怎么理解呢？想了很久没明白，希望给与解答

[ 本帖最后由 snake_blue 于 2008-9-5 14:51 编辑 ]

snake_blue

自己顶一下，希望有高手给解答下

blackold

a[i,$1]=a[i,$1]?a[i,$1]","$22
条件表达式。
二维数组。

ly5066113

原帖由 snake_blue 于 2008-9-4 17:08 发表
4楼的是对的，我的有问题。4楼的哥们能否给解释一下{a=a?a","$22} 这个，是用三元操作符给a赋值吗？如果是的话a?这个应该怎么理解呢？想了很久没明白，希望给与解答

{a[i,$1]=a[i,$1]?a[i,$1]","$22}

<==>

if ( a[i,$1] ) a[i,$1] = a[i,$1] "," $2 ;else a[i,$1] = $2

snake_blue

谢谢楼上的解答，我理解的也是这个意思。就是if(a[i,$1])犯糊涂，a[i,$1]这个元素是个布尔变量?还是说他存在不为空就是真，为空就是假？