open(TEMPFILE, "$tempfile") || die("Can't open $tmpfile: $!");