$recip = 'fred@fred.com';<br>
$subject = $formvars{'subject'};<br>
open (MAIL, "| /usr/sbin/sendmail -t");<br>
print MAIL "To: $recip\r\n";<br>
print MAIL "From: Website Enquiry <>\r\n";<br>
print MAIL "Subject: $subject\r\n\r\n";<br>
print MAIL $message;<br>
close (MAIL);<br>