哈希的运用代码,Perl代码库,德仔网

代码语言

代码分类

【Perl】哈希的运用

作者:じ☆veィ尔惢 / 发布于2012/10/8/ 902

#读取一系列单词，然后打印一份列出每个单词出现次数的列表。

<div>print "请输入哈希的键值，输入结束后将统计每个哈希键输入的次数:\n";
while($line=<STDIN>){
 chomp($line);
 if(exists $b{$line}){
 $b{$line}++;
 }else{
 $b{$line}=1;
 }
}
foreach (sort keys %b){
 $value=$b{$_};
 print "$_ => $value\n";
}

评论列表

本站所提供的代码，版权归原作者所有，若有侵犯作者版权，请与我们联系，我们将立即删除或修改。谢谢!
本站所有代码发布及提供者。

　　

试试其它关键字

　哈希　

同语言下

可能有用的

じ☆veィ尔惢贡献的其它代码(1)

.哈希的运用