http://qs321.pair.com?node_id=11136327


in reply to Alternate command for tmpnam

Have a look at File::Temp:

use File::Temp 'tempfile'; my ($fh, $filename) = tempfile();