多列合并一行,求SHELL

lnzfm

原始数据
80      WWW-HTTP
135     MSRPC
137     NETBIOS-NS
139     NETBIOS-SS
445     MICROSOFT-DS
希望合并成为
80,135,137,139,445 WWW-HTTP,MSRPC,NETBIOS-NS,NETBIOS-SS,MICROSOFT-DS

jason680

回复 1# lnzfm

How about this

$ echo '80      WWW-HTTP
135     MSRPC' | awk '{p=p?p","$1:$1;w=w==""?$2:w","$2}END{print p,w}'
80,135 WWW-HTTP,MSRPC

   

reyleon

1. awk '{a=a?a","$1:$1;b=b?b","$2:$2}END{print a,b}' urfile  

复制代码

zhaopingzi

回复 1# lnzfm

1. 
   
2. awk  '{a=a$1",";b=b$2","}END{print substr(a,1,length(a)-1),substr(b,1,length(b)-1)}'  file
   
3. 80,135,137,139,445 WWW-HTTP,MSRPC,NETBIOS-NS,NETBIOS-SS,MICROSOFT-DS
   

复制代码

yestreenstars

@reyleon-vOFS=" "可以省略

reyleon

yestreenstars 发表于 2012-11-08 13:20
@reyleon-vOFS=" "可以省略

是的 发懵了

udevu

我也来一个
$ cat src.txt |awk 'BEGIN{a="";b="";}{if(NR==1){a=a$1;b=b$2;}else{a=a","$1;b=b","$2;}}END{printf("%s\t%s\n",a,b);}'
80,135,137,139,445      WWW-HTTP,MSRPC,NETBIOS-NS,NETBIOS-SS,MICROSOFT-DS
是不是矬了点

V_客

1. sed -r ':a;N;$!ba;:c;s/( +\w+[A-Z ,-]*)\n([0-9]+)/,\2\1,/;tc' file

复制代码

yjwan

不错   如果是多列的话 可以用数组循环实现

[root@lefty ~]# cat 123
1 r  yy uu
2 t3  ii
3 ttt hh  ll ;;
4 rrrr  oo

[root@lefty ~]# cat 123 |awk '{for(i=1;i<=NF;i++)a[i]=a[i]?a[i]","$ii}END{for(i=1;i<=length(a);i++)printf a[i]" ";printf "\n"}'
1,2,3,4 r,t3,ttt,rrrr yy,ii,hh,oo uu,ll ;;