Jenda Krynicky wrote:
>
> But don't ever forget to reset it back! :
>
> { local $, = ", ";
> print @output;
> }
>
> IMHO using join() is safer. I'd only use something like this if I
> needed to interpolate several arrays in a HERE-DOC string. I'd
> change $" then of course :
>
> { local $" = ', ';
> print <<"*END*";
> Blah blah blah
> Users: @users
> Groups: @groups
> *END*
> }
>
> and even then I'd probably do something like :
>
> use Interpolation '=' => 'eval';
> print <<"*END*";
> Blah blah blah
> Users: $={join ', ', @users}
> Groups: $={join ', ', @groups}
> *END*
>
> Strange as well, but a bit safer.
Or if you don't have the Interpolation module:
print <<"*END*";
Blah blah blah
Users: @{[join ', ', @users]}
Groups: @{[join ', ', @groups]}
*END*
John
--
use Perl;
program
fulfillment
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
