On 2007/04/04, at 18:12, Randal L. Schwartz wrote:

"Igor" == Igor Sutton Lopes <[EMAIL PROTECTED]> writes:

Igor> my $str = join( " ", map { s/\B(\w+)/\L\1/; $_ } split( / \s+/, $_ ) );

It's bad style to modify $_ in a map, because that also modifies the incoming
data.  The simplest workaround is adding local:

@out = map { local $_ = $_; s/.../.../; $_ } @in

Thanks pointing that.

--
Igor Sutton
[EMAIL PROTECTED]



Attachment: PGP.sig
Description: This is a digitally signed message part

Reply via email to