From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Tue, 30 Sep 2003 12:47:13 +0000 (+0000)
Subject: Useless "local $_" in a perlfaq3 example
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=6c43ef161e0ec34cd4fb65e1d0e735a35cf35009;p=p5sagit%2Fp5-mst-13.2.git

Useless "local $_" in a perlfaq3 example

p4raw-id: //depot/perl@21391
---

diff --git a/pod/perlfaq3.pod b/pod/perlfaq3.pod
index 78f220a..8fd484f 100644
--- a/pod/perlfaq3.pod
+++ b/pod/perlfaq3.pod
@@ -146,10 +146,8 @@ Here's a sample use of Benchmark:
   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 },
            });