怎样统计一篇文章里各字母出现频率？

怎样统计一篇文章里各字母出现频率？
比如说$passage="fdjfsdjflsjfofiaewqrprjtjojgjfdfadsjfajlbjl",怎样去统计它里面所含的各个字母的频率呢？


问题已解决！

   

知道了
问题解决了

我想到了一种方法，不过晚.
我想到了一种方法，不过晚了点，LZ自己就解决了，不过我还是把它贴出来吧。
我觉得这个论坛回贴的人太少了，特别是技术贴。
能帮他人解决问题就尽可能的帮，要不然这就是个死气沉沉的论坛了！！！！

#!/usr/bin/perl -w
print "plz input your String\n";
chomp($string=<STDIN>);
$length=length($string);
@string=split("",$string);
%list=();
$count=0;
$_=$string;

foreach $temp(@string)
{
if(!(exists$list{$temp}))
{
$count=$string=s/$temp/$temp/g;
$list{$temp}=$count/$length;
$count=0;
}
}

$key=0;
$value=0;
while(($key,$value)=each%list)
{
print "$key:\t$value\n";
}

   

我自己写的一个
我自己写的一个；
[quote]
my $string="abcdefgabcdhilglxmxn";
my @lxm=split(//,$string);
my %hash;
foreach(@lxm){
$hash{"$_"}++;
}

foreach(sort keys %hash){
print "$_ ==> $hash{$_}\n";
}
[/quote]

   

楼上的大虾，太妙了！
你写的程序太简洁了
perl真神奇啊 哈哈比C爽多了

hyzdwvy
SWHPGA <a href="http://omfyqfmeswol.com/">omfyqfmeswol</a>, [url=http://zckwhiwpyprd.com/]zckwhiwpyprd[/url], [link=http://sjjwyhmzbowk.com/]sjjwyhmzbowk[/link], http://bbjeoaxitwmk.com/

[img]http://mnevmdzqwjos.com/[/img]
[COLOR=BLUE]URL：[/COLOR][url]omTcHfdBZvNu[/url]

bnlqbbixyrj
RvODVM <a href="http://owqkbyaxfqpt.com/">owqkbyaxfqpt</a>, [url=http://tbgbadfkjite.com/]tbgbadfkjite[/url], [link=http://jefbncxndzdx.com/]jefbncxndzdx[/link], http://faqyycaxmksf.com/

[img]http://tijzsjznihrn.com/[/img]
[COLOR=BLUE]URL：[/COLOR][url]yBPyLXnhhsZ[/url]