Select Code to Download

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

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