my $str = "@arr";

##</code><code>##

my $str = do { local $" = ""; "@arr" };