loris has asked for the wisdom of the Perl Monks concerning the following question:
Dear Monks,
I assume I am being dopey, but I don't understand why this
my $fh; open($fh,'<',$file); while (<$fh>) { print "line: $_\n"; }
is OK, whereas this
my $fh; $fh = cacheout('<',$file); while (<$fh>) { print "line: $_\n"; }
tells me
readline() on unopened filehandle 1 at ... readline() on unopened filehandle 2 at ... readline() on unopened filehandle 3 at ... ...
Can someone please enlighten me?
Update: I'm using Perl 5.8.0 on solaris.
Thanks,
"It took Loris ten minutes to eat a satsuma . . . twenty minutes to get from one end of his branch to the other . . . and an hour to scratch his bottom. But Slow Loris didn't care. He had a secret . . ." (from "Slow Loris" by Alexis Deacon)
Back to
Seekers of Perl Wisdom