if ($ENV{PAR_CLEARTEMP}) {
   ($fh, $filename) = File::Temp::tempfile(
      DIR	=> ($ENV{PAR_TEMP} || File::Spec->tmpdir),
      SUFFIX	=> ".$dlext",
      UNLINK	=> ($^O ne 'MSWin32'),
    );
}