[patch] perlfaq7

Message-ID: <3A38E7BB.13178.11C40A8@localhost>

p4raw-id: //depot/perl@8110

diff --git a/pod/perlfaq7.pod b/pod/perlfaq7.pod
index 9e559f7..0299c2d 100644 (file)
--- a/pod/perlfaq7.pod
+++ b/pod/perlfaq7.pod
@@ -397,7 +397,7 @@ they'll still work properly under C<use strict 'refs'>.  For example:
 If you're planning on generating new filehandles, you could do this:
 
     sub openit {
-        my $name = shift;
+        my $path = shift;
         local *FH;
         return open (FH, $path) ? *FH : undef;
     }