my @AoA = (['the', 'first', 'array'],
           ['another', 'array'],
           ['this', 'is', 'the', 'last', 'one']);

foreach (@AoA) {
  print scalar @$_, " elements\n";
}

##</code><code>##

3 elements
2 elements
5 elements