哈希列表和普通列表的差别是:哈希列表的索引是有业务含义的,普通列表的索引是数字。根据索引从哈希列表中获取信息的速度很快。
哈希列表变量用%开头。
哈希列表键值不能重复,如果重复,后面的值会覆盖前面的值。这一特性善加利用可用于统计单词出现的频率。
测试哈希列表中是否存在某元素,不能用if($Hash{keyval}){...},应该用if(exists $Hash{keyval}){...}。
将哈希列表的元素取值设置为undef不能删除这个元素,删除元素应该用delete $Hash{keyval}。清空哈西列表用$Hash=()。
没太搞明白$_的含义。手头这个教材有点老,教学案例中用perl承担数据库的功能有些勉为其难了,但是在没有数据库的情况下perl还是能解决一些问题的。
练习(f51.pl):
- #!/usr/bin/perl?-w ?
-
%food=(?apple=>'fruit',?
-
????????pear?=>'fruit',?
-
???????carrot=>'vegetable'); ?
-
#print?qq($food{'pear'}n); ?
-
$food{banana}='fruit'; ?
- @food=%food; ?
-
print(qq(food?list?is:n?@{food}.n)); ?
- foreach?my?$eat?(keys?%food){ ?
- ????????print?qq(food[$eat]=$food{$eat}n); ?
- } ?
-
print(qq(after?reverse?...?n)); ?
- %food=reverse(%food); ?
- @food=%food; ?
-
print(qq(food?list?is:n?@{food}.n)); ?
- foreach?my?$eat?(keys?%food){ ?
- ????????print?qq(food[$eat]=$food{$eat}n); ?
- }?
$ perl f51.pl
food list is:
?banana fruit carrot vegetable apple fruit pear fruit.
food[banana]=fruit
food[carrot]=vegetable
food[apple]=fruit
food[pear]=fruit
after reverse ...
food list is:?
?fruit banana vegetable carrot.
food[fruit]=banana
food[vegetable]=carrot
从这个练习中可以看出,reverse(%food)后,因为fruit重复的原因,后面的元素覆盖了前面的元素,哈希列表的元素个数变少了。简而言之,哈希列表的reverse通常是不可逆的,要可逆必须一一对应,且两边都不能有重复。
这次就写到这里吧。