diff options
author | Gerrit P. Haase <gp@familiehaase.de> | 2000-12-14 16:31:07 +0100 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-12-14 21:36:32 +0000 |
commit | fc40549da36a06c4f8c329427e99d706b2249e19 (patch) | |
tree | c223a89b1c69f3e6cdf65036779a722950b87cdc /pod/perlfaq7.pod | |
parent | 62e8870c07ea83d1b2b02be413f0893b02fc554c (diff) | |
download | perl-fc40549da36a06c4f8c329427e99d706b2249e19.tar.gz |
[patch] perlfaq7
Message-ID: <3A38E7BB.13178.11C40A8@localhost>
p4raw-id: //depot/perl@8110
Diffstat (limited to 'pod/perlfaq7.pod')
-rw-r--r-- | pod/perlfaq7.pod | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/pod/perlfaq7.pod b/pod/perlfaq7.pod index 9e559f7d0e..0299c2d893 100644 --- 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; } |