open (MAIL, "|/usr/bin/sendmail -t") or die "Error"; print MAIL "To: to@address.com \nFrom: from@address.com\n"; print MAIL "Subject: mail subject\n"; print MAIL "Add the contents here\n"; close (MAIL);