right-o, albannach!

my personal favorite is

use POSIX;
use IO::Handle;

  # create temp file
  my $TMPFH = new IO::Handle;
  do { $tmpfile = $mytmpdir . tmpnam() }
    until sysopen(TMPFH, $tmpfile, O_RDWR|O_CREAT|O_EXCL);

  # do something, like write to the tempfile
  foreach(@list) { print TMPFH $_,$n }
  # ...

  close TMPFH;

  # do something, like read in the tempfile...

  # when you're done, delete it
  unlink($tmpfile) or warn("WARN: cannot delete $tmpfile! $!");
[download]

~Particle