"lists user" schreef:
> I saw this code piece in perldoc perldata,
>
> sub newopen {
> my $path = shift;
> local *FH; # not my!
> open (FH, $path) or return undef;
> return *FH;
> }
> $fh = newopen('/etc/passwd');
>
>
> why it say a 'local *FH' here?
> why not just,
>
> open FH,$path or return undef;
> return *FH;
With a recent perl use lexical filehandles.
Check out `perldoc -f open`. And perlopentut.
The very old way:
$FILE = "/etc/motd";
open FILE or die "can't open $FILE: $!";
The old way:
my $filename = "/etc/motd";
open FILE, $filename or die "can't open $filename: $!";
The current way:
my $filename = "/etc/motd";
open my $fh, "<", $filename or die "can't open $filename: $!";
--
Affijn, Ruud
"Gewoon is een tijger."
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
