Select Code to Download

foreach my $o (@outer) {
    $o .= 'loop';
    print $o, "\n";
}

$outer[0] .= 'loop';
print $outer[0], "\n";
...
print $outer[1], "\n";
$outer[2] .= 'loop';
print $outer[2], "\n";