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

查看本栏目更多精彩内容：http://www.bianceng.cnhttp://www.bianceng.cn/Programming/extra/

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};

[未完]

本文出自 “努力为之” 博客，请务必保留此出处http://carllai.blog.51cto.com/1664997/1175028