$mail{Message} = <<"EOM";
Hello,

NSTouch wants to ...
EOM
# ...
if (sendmail %mail) {
# ...