统计每行不同字符的个数

数据格式如下：

NN TT NN NN AT NN AT NN NN NN AT NN NN AA NN AT NN
GG AA GG AA AG GG AG GG GG GG AG AG AG NN AG AG GG
NN TT NN NN TT NN TT NN NN NN TT NN NN TT NN TT NN
AA AG AG AG AG AG AG AA AG GG AG GG AG NN AG AG AG
AA AG AG AG AG AG AG AG GG GG AG GG AG NN AG GG AG
GG GG GG GG GG GG GG GG GG AG GG GG GG NN GG GG GG
GG GG GG GG GG GG GG AG AG GG GG GG GG NN GG GG GG
NN CC NN NN CC NN CC NN NN NN CC NN NN CC NN CT NN
TT CT CT CT CC CT CC CT CC CT CT CC CT NN CT CC CT
NN AG NN NN AA NN AA NN NN NN AG NN NN AG NN AA NN
TT AT AT AT AA AT AA AT AA AT AT AA AT NN AT AA AT
GG GT GT GT TT GT TT GG GT GG GT TT GT NN GT GT GT
NN CC NN NN CC NN CC NN NN NN CC NN NN CC NN CC NN
AA AG AG AG GG AG GG AA AG AA AG GG AG NN AG AG GG
GG AG AG AG AA AG AA GG AG GG AG AA AG NN AA AG AG
GG AG AG AG AA AG AA GG AG GG AG AA AG NN AG AG AG
NN AA NN NN AA NN AA NN NN NN AA NN NN NN NN AA NN
CC CC CC CC CC CC CC CC CT CC CC CC CC NN CC CC CC
NN AG NN NN GG NN GG NN NN NN AG NN NN GG NN AG NN
TT TT TT TT TT TT TT TT CT TT TT TT TT NN TT TT TT

复制代码

每行最多有3种字母，现在需要统计每行每种字母出现次数，如第一行，输出结果为

A：6，N：22，T:6

复制代码

，其他行一样

作者: sequencing 发布时间: 2011-06-15

$ echo 'NN TT NN NN AT NN AT N
N NN NN AT NN NN AA NN
AT NN' | sed -e 's/[^ ]/& /g' | awk '{for(i=1;i<NF;i++){a[$i]++}}END{fo
r(l in a)printf l":"a[l]","}'
A:6,N:21,T:6,

复制代码

作者: liion631818 发布时间: 2011-06-15

perl -ne 's/\s*//g;split //;map{$a{$_}++} @_;while(($k,$v)=each(%a)){print "$k:$v,"};print "\n";undef %a;'

复制代码

作者: springwind426 发布时间: 2011-06-15

QUOTE:

liion631818 发表于 2011-06-15 10:16

QUOTE:

sed -e 's/[^ ]/& /g'

&是什么意思?谢谢..

作者: horizonhyg 发布时间: 2011-06-15

QUOTE:

liion631818 发表于 2011-06-15 10:16

多谢！

作者: sequencing 发布时间: 2011-06-15

回复 horizonhyg

& 引用之前匹配到的内容

$ echo "abc123" | sed 's/[a-z]*/&--/'
abc--123

复制代码

作者: liion631818 发布时间: 2011-06-15

QUOTE:

springwind426 发表于 2011-06-15 10:53

高手！学习了

作者: sequencing 发布时间: 2011-06-15