Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask

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;

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 one hand claps...

How do I use this? | Other CB clients
Other Users?
Others perusing the Monastery: (3)
As of 2018-03-25 05:45 GMT
Find Nodes?
    Voting Booth?
    When I think of a mole I think of:

    Results (300 votes). Check out past polls.