open(MAIL, "|mail $EMAIL"); print MAIL "To: $EMAIL\n"; print MAIL "From: $FROM\n"; print MAIL "Subject: $MAILSUB\n"; print MAIL "Content-Type: text/plain; charset=\"iso-8859-1\""; open(MESSAGE, "<", "$TMPFILE") or die "$!"; print MAIL <MESSAGE>; close MESSAGE; close MAIL;
In reply to File I/O question by sierpinski
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |