Re: How do i create array of arrays

[robsv]

# Create the arrays
my $a = [qw(one two three four)];
my $b = [qw(red green blue)];
# Create the array of arrays
my $aoa = [$a,$b];
# Print each element
foreach $i (0..$#{$aoa})
{
  foreach $j (0..$#{$aoa->[$i]})
  {
    print $aoa->[$i][$j] . "\n";
  }
}