Change 21391 by [EMAIL PROTECTED] on 2003/09/30 12:47:13
Useless "local $_" in a perlfaq3 example
Affected files ...
... //depot/perl/pod/perlfaq3.pod#77 edit
Differences ...
==== //depot/perl/pod/perlfaq3.pod#77 (text) ====
Index: perl/pod/perlfaq3.pod
--- perl/pod/perlfaq3.pod#76~21282~ Thu Sep 18 14:10:26 2003
+++ perl/pod/perlfaq3.pod Tue Sep 30 05:47:13 2003
@@ -146,10 +146,8 @@
timethese($count, {
'map' => sub { my @a = @junk;
map { s/a/b/ } @a;
- return @a
- },
+ return @a },
'for' => sub { my @a = @junk;
- local $_;
for (@a) { s/a/b/ };
return @a },
});
End of Patch.