my @ary = ( [12,13,14,15], [67,68,69,70,71]); print scalar(@{ $ary[1] }); $var = @{ $ary[1] }; print $var;