Perl哈希的用法总结
对Perl中哈希用法的总结用胖箭头对哈希键值对进行赋值
[*]%some_hash = ('jim' => '20', 'tom' => '18', 'jerry' => '21');
将哈希转换为列表
[*]%any_hash = (k1,'v1',k2,'v2',k3,'v3',k4,'v4');
[*]@arr = %any_hash;
keys函数, 将哈希中的键提取出来， 例如存放到数组@k中
[*]my @k = keys %any_hash;
values函数，将哈希中的值提取出来，例如存放到数组@v中
[*]my @v = values %any_hash;
each函数，将哈希中的键和值分别提取出来，例如分别返回键-值给$k, $v
[*]while (($k,$v) = each %any_hash){
[*] print "$k => $v\n";
[*]}
exists函数，检查哈希中是否存在某个键， 有则返回真，否则返回假
[*]if (exists $any_hash{k1}){
[*] print "This key exists.\n";
[*]}
delete函数， 删除哈希中的键
[*]delete $any_hash{k2};
[未完]
页:
[1]