Re^3: Print name of array

And what would you return for this?

@AoA = ([qw/Mercury Venus Earth Mars/], [qw/1 1 2 3 5 8 13 21/]);
[download]

From where should Perl know it's planets and fibonacci?

Update: Also consider

@x = (1, 2, 3);
*y = *x;
my @AoA = (\@x, \@y);
[download]

Is it @x or @y?

Comment on Re^3: Print name of array Select or Download Code

Replies are listed 'Best First'.
Re^4: Print name of array by Saved (Beadle) on Dec 06, 2011 at 13:35 UTC
`my @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"; }` [download] 0 Mercury Venus Earth Mars 1 1 1 2 3 5 8 13 21	[reply] [d/l]