This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Useless "local $_" in a perlfaq3 example
[perl5.git] / pod / perlfaq3.pod
index 78f220a..8fd484f 100644 (file)
@@ -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 },
            });