open (FILE, $FORM{'template'}) or die "can't open FILE $FORM{template}: $!"; @File = ; close (FILE); open (MAIL, "|$mailprog -t") || &Error('Unable to Open Sendmail');