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