Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine

Re: Open file issues

by eserte (Deacon)
on Aug 18, 2004 at 09:55 UTC ( #383908=note: print w/ replies, xml ) Need Help??

in reply to Open file issues

All the files in your script share one filehandle, FILE. You have two options to solve this problem: use Symbol::gensym() to create unique filehandles, or use lexicals instead of bareword filehandles. The latter option requires you to have a new perl (5.6 or 5.8, I can't remember). The code would look like this:

my $fh; open($fh, "...") or die ...; return $fh;

Comment on Re: Open file issues
Select or Download Code
Replies are listed 'Best First'.
Re^2: Open file issues
by Fletch (Chancellor) on Aug 18, 2004 at 13:03 UTC

    You could also use IO::File which should work in even older perls.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://383908]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (2)
As of 2015-10-10 20:23 GMT
Find Nodes?
    Voting Booth?

    Does Humor Belong in Programming?

    Results (258 votes), past polls