Re: Unique filehandle -- what is correct?

in reply to Unique filehandle -- what is correct?

This is a common task, try a module like File::Temp. If you have perl 5.6.1 or newer, it is already installed. In your case, use UNLINK => 1 to automatically remove the temp. file after program execution. There are more options that let you fine-tune the filename format/suffix, the directory and so on.

use strict;
use warnings;
use File::Temp qw(tempfile);

#-- UNLINK => 1: removes the tempfile when program finishes
#   perldoc File::Temp - shows more usage options
my ($fh, $filename) = tempfile( UNLINK => 1);

#-- that's it - now display filename...
print "Filenme:  $filename\n";

#-- or use filehandle... (here: no open()/close() required!)
print $fh "lalala\n";

#-- here: file is removed automatically on program exit
[download]

Comment on Re: Unique filehandle -- what is correct? Select or Download Code

Replies are listed 'Best First'.
Re^2: Unique filehandle -- what is correct? by Anonymous Monk on Dec 11, 2011 at 12:32 UTC
Yes it works ok! Now I can run multiple instances of the same cgi-script since it works with the temporary file each time! Thanks!	[reply]

In Section Seekers of Perl Wisdom