perl中的hash练习笔记

这道练习题是小骆驼中hash中的一道，感受颇有表明性。       读取一些单词，每行一个直到文件结束，而后出每一个单词出现的次数。 有两种方法能够完成它，以下 第一种方法 #!/usr/bin/perl -w  print "Enter words:"  chomp(@k=<>);  foreach $k (@k) {               $count{$k} +=1 ; #计算单词的次

>>阅读原文<<