$from = "user\@domain.com";
$to = "user\@domain.com";
$subject = "Application";
$sendmailpath = "/usr/sbin/sendmail";
open (SENDMAIL, "| $sendmailpath -t");
print SENDMAIL "Subject: $subject
";
print SENDMAIL "From: $from\n";
print SENDMAIL "To: $to\n\n";
# EMAIL here
close(SENDMAIL);
|