复杂数据结构的访问

复杂数据结构的访问
在《perl 参考大全》里面看到这样一个例子。
有些疑问，向大家请教。
问题：$db{contacts}[2]->{"name"};固然是可以访问值的。
但是我在我不知道contact里有多少个人的情况下怎么访问？怎么求contact里面有多少个人。

my %db=(
contacts=>[
{"name" =>"chen",
"age"=>23},
{"name" =>"le",
"age"=>25},
{"name" =>"wa",
"age"=>21},
],
);

注：。%db 里面只有一个元素contacts，而contacts是 一个数组，这个数组里面由0－n个 hash组成

print scalar (@{$db{cont.
print scalar (@{$db{contacts}});

print $#{$db{contacts}}+.
print $#{$db{contacts}}+1;