一个数据文件的处理，大家帮帮忙（问题升级了）

gx4301

数据本来是sql server的数据库    用sql来写效率奇差   而且实现不了
现在到出来变成csv    大家看看怎么用perl 或者awk或者bash处理

要求是这样的

原来的数据是这样的

列1   列2

a     01

a     02

a     03

b     01

b     02



需要写一个算法变换成



变换后

a     01   02  03

b     01   02


实在不好意思    这个问题升级一下

现在要求是这样的

原来的数据是这样的

列1   列2    type

a     01      1

a     02      1

a     03       0

b     01       1

b     02        0

变化后

列1    type为1的    type为0的
a       01/02            03
b       01                 02

多个值的用“/”分隔   比如01/02   

[ 本帖最后由 gx4301 于 2009-5-31 13:02 编辑 ]

ubuntuer

1. awk 'NF==2{a[$1]=a[$1]"\t"$2}END{for(i in a)print i,a[i]}'

复制代码

lululau

awk '{array[$1] = array[$1]" "$2}END{for (i in array){print i, array}}'
文件不太大的话

blackold

成经了。

gx4301

原帖由 blackold 于 2009-5-27 16:48 发表
成经了。

[ 本帖最后由 gx4301 于 2009-5-27 16:52 编辑 ]

lucash

1. awk '{a[$1]=a[$1]"\t"$2}END{for(i in a) print,i,a[i]}'

复制代码

[ 本帖最后由 lucash 于 2009-5-27 16:57 编辑 ]

gx4301

谢谢 大家   
不过我对awk不太了解   
周末回家自学一下先
下周处理完了再一一感谢

springwind426

如果是排好序的话

1. 
   
2. awk 'NF==2{if(a == $1){printf "\t" $2}else{a=$1;printf "\n" $0;}}END{print ""}'  数据文件
   

复制代码

greendays

awk '{a[$1]=a[$1]$2"\t"}END{for(i in a) print i"\t"a}' urfile

moartel

原帖由 lululau 于 2009-5-27 16:43 发表
awk '{array[$1] = array[$1]" "$2}END{for (i in array){print i, array}}'
文件不太大的话

是不是漏了点东西?