probleme mit sendmail

[andy]

hi
kann mir jemand helfen ich weiß nicht wo der fehler liegt:
er bringt mir im Explorer ein Internal Server Error

#!/usr/bin/perl
 use CGI;

my $adminemail = '[e-mail]';

Pfad zum Mailprogramm

my $query    = new CGI;
 my $sendmail = "/usr/sbin/sendmail -t";
 my $reply_to = "Reply-to: [e-mail]";
 my $subject  = "Subject: only a test";
 my $content  = "das ist eine testmail";
 my $to       = '[e-mail]';
 my $mailprogramm = "/usr/lib/sendmail -t";

open(MAIL,"$mailprogramm ");

print MAIL "To: $adminemail\n";
 print MAIL $subject;
 print MAIL $to;
 print MAIL "Content-type: text/plain\n\n";
 print MAIL $content;

close(MAIL);

print $query->header;

Danke

[Cheatah]

Hi,

Internal Server Error

Error-Log.

Cheatah

P.S.: Warum benutzt Du eigentlich nicht Net::SMTP, wie es sich gehört?

[Alexander Foken]

Moin Moin !

P.S.: Warum benutzt Du eigentlich nicht Net::SMTP, wie es sich gehört?

MIME::Lite ist auch sehr schön. Kann zwar vielleicht nicht jede Perversität, die man mit Net::SMTP machen kann, aber für den Normalfall ist es mehr als ausreichend.

Leider benutzt auch MIME::Lite defaultmäßig SendMail, aber das kann man schnell ändern:

MIME::Lite->send('smtp','smtp-mail-server.example.com');

Alexander