$myInfo .= "
$myField$myValue
\n"; open (MAIL,"|$sendmail"); print MAIL <<"EOF"; To: $toAddress From: $fromAddress Subject: Send mail test $myInfo EOF close;