FileCache Usage

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";
  }
[download]

is OK, whereas this

  my $fh;
  $fh = cacheout('<',$file);
  while (<$fh>) {
    print "line: $_\n";
  }
[download]

tells me

readline() on unopened filehandle 1 at ...
readline() on unopened filehandle 2 at ...
readline() on unopened filehandle 3 at ...
...
[download]

Can someone please enlighten me?

Update: I'm using Perl 5.8.0 on solaris.

Thanks,

loris

"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