$str = join( '', @arr );

##</code><code>##

{
   local $" = ''; # see perlvar
   $str = "@arr";
}