数组个数

perlintro和perlreftut才了解了原来是匿名数组引用。。。。
悲剧，遗忘率太高了

这个可以是print @{$a{a}}+0
或 print $#{$a{a}}+1

我要成为大师(694360875) 21:08:45
my %a=(
a =>[[1,2],[3,4],[10,12]],
b =>[[1,2],[3,4]],
);   我该怎么获得$a{a}的元素个数？