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