sendmail in PERL troubles

[mark30289]

Hi... I have been having problems getting sendmail to work. 5 hours and counting. Here's what I have:

#!/usr/local/bin/perl -w

use sql;
use CGI qw/:standard/;
use DBI;

$mail_prog = "/usr/sbin/sendmail";
print "Content-type: text/html\n\n";

$to='[e-mail]';
$from= '[e-mail]';
$subject='Your membership';

open (MAIL, "|$mail_prog -t");
print MAIL "To: $to\n";
print MAIL "Reply-to: $from\n";
print MAIL "From: $from\n";
print MAIL "Subject: ".$subject."\n";
print MAIL "\n\n";

print MAIL "
Just a reminder that membership fees are due on the first of each month...

";

close (MAIL);

It has to be something simple, because I am using a scrip that worked in the past and I just can't spot the error(s)... thanks!

[mitchems]

I'd use a module.

Net:SMTP or MIME::Lite

Will do the trick.