Help for this page
open(SENDMAIL, '|/usr/sbin/sendmail -oi -t') or (unlink ($outfile), diehtml("Can't fork for sendmail: $!\n"));
sysopen(SENDMAIL, "|/usr/sbin/sendmail -oi -t", O_CREAT | O_EXCL | O_R +DWR, 0600) or (unlink ($outfile), diehtml("Can't fork for sendmail: $!\n"));