Select Code to Download

$mail_prog = "/usr/sbin/sendmail -t";
open(MAIL, "|$mail_prog -t");

print MAIL <<"MESG";
To: $recipient
From: $sender
...
---------------------------------------------------
.
MESG