Andre Meyer: E-Mail automatisch an mich versenden

Beitrag lesen

Hallo Leute,

ich hab schon im Archiv gesucht, bin aber leider nicht fündig geworden. Und zwar versuche ich mit einem Perl Script ein E-Mail an mich zu versenden wenn jemand meine Homepage ansieht. Ich bin noch nicht sehr belesen in der Perl Programmierung und habe diesen Ansatz daher aus Selfhtml entnommen.

Das Script:
#!/usr/bin/perl

$counter = "count.txt";

open(ANZ, "$counter");
$anzahl = <ANZ>;
close(ANZ);

$mailto  = 'andremeyer21@aol.com';
$subject = 'Wieder jemand auf der Seite!';
$mailtext= 'Schon $anzahl Besucher auf www.quatschimeyer.com';

my $Sendmail_Prog = "/usr/lib/sendmail";
open(MAIL,"|$Sendmail_Prog -t") || print "Mailprogramm konnte nicht gestartet werden\n";
print MAIL "To: $mailto\n";
print MAIL "Subject: $subject\n\n";
print MAIL "$mailtext\n";
close(MAIL);

Im Browser steht dann immer "Befehl oder Dateiname nicht gefunden" und im Serverlog steht die Meldung "Sat, 15.03.2003 10:34:13 : Cgi-Program did not send header-termination (\n\n). Cgi-Program: F:\Homepage(save)\cgi-bin\user.pl"

Aufrufen tue ich dieses Script mit <form action="/cgi-bin/user.pl" method="post">

Gruß
Andre