my $string = join '', @$_ for @AoA;

##</code><code>##

my $string = '';
$string .= join '', @$_ for @AoA;