my $nofile = open TMPFILE, $tempfile;