Select Code to Download

my @array1 = (['a', 'b'], ['c', 'd']);

...

my @array4;
push @array4, (\@ab, \@cd);

print "$array1[0][0]\n\n";

...

print "\n";
print "@$_\n" for @array1;

a

...

a b
c d