0 Mercury Venus Earth Mars 1 1 1 2 3 5 8 13 21my @AoA = ([qw/Mercury Venus Earth Mars/], [qw/1 1 2 3 5 8 13 21/]); for my $index (0 .. $#AoA) { print "$index\t@{ $AoA[$index] }\n"; }
In reply to Re^4: Print name of array
by Saved
in thread Print name of array
by Saved
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |