open(SENDMAIL, '|/usr/sbin/sendmail -oi -t')
   or do{ unlink($outfile); diehtml("Can't fork for sendmail: $!\n")};