Array Perl

  1. Home
  2. Perl
  3. Array
  4. Using array reference to create two-dimensional array
@array1 = qw(apples oranges);
@array2 = qw(asparagus corn peas);
@array3 = qw(ham chicken);
$array[0] = \@array1;
$array[1] = \@array2;
$array[2] = \@array3;
print $array[1][1];