我在linux中有一个文件,我想要一个shell脚本:
file:| | After running the script:
A a | | A a g k
B b | | B b k
C c | -> | C c
A g |
A k |
B k |
答案 0 :(得分:1)
perl -lane 'push @{$data{$F[0]}}, $F[1]} {$,=" "; print $_, @{$data{$_}} for sort keys %data' file
awk '{data[$1] = data[$1] $2 " "} END {for (key in data) print key, data[key]}' file