jrhmpt01:/root/wx# cat k3.pl
@var=({a=>1,b=>2},{a=>3,d=>4});
print @var;
print "\n";
foreach (@var){print "\$_ is $_\n"};
print "2222222222222222222\n";
foreach (@var){print "\$_ is $_->{a}\n"};
jrhmpt01:/root/wx#
jrhmpt01:/root/wx# perl k3.pl
HASH(0x777d48)HASH(0x7941b8)
$_ is HASH(0x777d48)
$_ is HASH(0x7941b8)
2222222222222222222
$_ is 1
$_ is 3
散列的数组
最新推荐文章于 2022-01-08 15:03:56 发布
这篇博客展示了如何在Perl中使用散列数组,通过示例代码`k3.pl`解释了如何打印和遍历散列数组,强调了访问散列数组元素特别是`a`键值的方法。
摘要由CSDN通过智能技术生成