Perl 教程 之 Perl 哈希 8

Perl 哈希

获取哈希大小

哈希大小为元素的个数，我们可以通过先获取 key 或 value 的所有元素数组，再计算数组元素多少来获取哈希的大小，实例如下：

实例

!/usr/bin/perl

%data = ('google'=>'google.com', 'baidu'=>'baidu.com', 'taobao'=>'taobao.com');

@keys = keys %data;
$size = @keys;
print "1 - 哈希大小: $size\n";

@values = values %data;
$size = @values;
print "2 - 哈希大小: $size\n";
执行以上程序，输出结果为：

1 - 哈希大小: 3
2 - 哈希大小: 3