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 (file)
--- 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 },
            });