my ($tempfile, $name) = tempfile();
close $tempfile;