Select Code to Download

use strict;

...
foreach my $aref (@array2) {
   print "@$aref\n";
}

array1 contains:
r a c e
...
r a c e
r a c e
r a c e