länge eines mehrdimensionalen Array auselesen

[roger]

Hallo
sieht doch gut aus.

assign a reference to array of array references

my  $AoA_ref = [
[ "fred", "barney", "pebbles", "bambam", "dino", ],
[ "homer", "bart", "marge", "maggie", ],
[ "george", "jane", "elroy", "judy", ],
    ];

for my $i ( @$AoA_ref ) {
for my $j ( @$i ) {
  print $j,"\t";
}
print "\n";
}

Wie sieht es aus wenn die die Anzahl der Felder im 2. Array haben will ?
Anzahl der Felder im @$i ?

Gruß
          roger