awk问题，高手帮帮忙！！！

queperl

文本文件如下：
52004|192.168.0.252
52005|192.168.0.252
52006|192.168.0.252
52007|192.168.0.252
52008|192.168.0.253
52009|192.168.0.253
52010|192.168.0.254

想按照IP地址相同的合成为一行，结果如下：
52004|52005|52006|52007|192.168.0.252
52008|52009|192.168.0.253
52010|192.168.0.254   

如何用awk解决，请大虾赐教！！！谢谢！

taige

1. sort -t"|" +1 文件名 | awk -F"|" 'BEGIN{LAST_IP="0.0.0.0"} {
   
2. if (LAST_IP!=$2) {
   
3.     if (LAST_IP!="0.0.0.0") {
   
4.         printf "%s\n", LAST_IP;
   
5.     }
   
6.     LAST_IP=$2;
   
7. }
   
8. printf "%s|", $1;
   
9. } END {printf "%s\n", LAST_IP}'     

复制代码

三剑侠客

我来一个用awk中数组来实现的办法，呵呵，请大家指教!

                   awk 'BEGIN {FS="|"} {
                           num[$2]=$1
                           result[$2]=result[$2]num[$2]"|"
                           }
                           END {
                           for(i in result)
                           print result i
                           }' filename

三剑侠客

改进一下,去掉name[$2]
awk ' BEGIN {FS="|"} {
result[$2]=result[$2]$1"|"
}
END { for(i in result)
print result i
}' filename

queperl

多谢taige，三剑侠客 。发了贴后，一直没有机会上网。
之到今天才看到大虾们的回复。
谢谢！！！致敬！！！

anonimousboy

[quote]原帖由 "三剑侠客"] filename[/quote 发表：
     
哈哈,这个想法不错,利用AWK的数组,挺好~~~