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