Question

perl的哈希数组如何得到里面数据对儿的个数？

perl的哈希数组如何得到里面数据对儿的个数？
就像普通数组的$#操作一样，但可以得到哈希数组里面的成对儿数据的个数，就是有多少对数据。谢谢。

Answer 1

只需要申明标量环境就可以了，据个例子如下
#!/usr/bin/perl -w

use strict;
use warnings;

my %hash=map {$_=>$_+1} (1..6);

print scalar keys %hash;
---------------------------
输出结果
6

Answer 2

一个傻办法
my $count;
foreach (keys %hash)
{ $count += 1; }

就可以了