Hallo zusammen,ich habe einen Formmailer auf folgender Seite: "http://www.abtsbessingen.de/gaestebuch.html".
Schaut euch erst mal den Quelltext an. Der Formmailer arbeitet mit folgender Perl-Datei zusammen: "http://www.abtsbessingen.de/cgi-bin/mail.pl".
#!/usr/bin/perl# -------> Individuelle Parameter des Skriptes - bitte anpassen!
# --> SMTP-Programm zum Versenden der Mail:
$Sendmail_Prog = "/usr/sbin/sendmail";
# --> Ziel-Mailadresse, an die gesendet werden soll:
$mailto = 'ozzyka@gmail.com';
# -------> Modul für CGI-Scripts einbinden:
use CGI;
# -------> Modul für CGI-Scripts zum Einlesen der Formulardaten anwenden:
$query = new CGI;
@names = $query->param;
# -------> interne Daten aus den erwarteten hidden-Feldern auslesen:
$begrenzer = $query->param('begrenzer'); # ---> Begrenzerzeichen zwischen name und value
$adresse = $query->param('adresse'); # ---> URL für Dankeseite
$betreff = $query->param('betreff'); # ---> E-Mail-Subject
# -------> alle Whitespace-Zeichen (Leerzeichen, Tabulator, Newline) in Leerzeichen wandeln
# VERHINDERT sonst möglichen MISSBRAUCH des Skripts
$betreff =~ s/\s/ /g;
# -------> Text der E-Mail aus den Formulardaten ermitteln:
$mailtext = "";
foreach(@names) {
$name = $_;
@values = "";
@values = $query->param($name);
if($name ne "adresse" && $name ne "betreff" && $name ne "begrenzer") {
foreach $value (@values) {
$mailtext = $mailtext.$name;
$mailtext = $mailtext.$begrenzer;
$mailtext = $mailtext.$value."\n";
}
}
}
# -------> E-Mail versenden:
open(MAIL,"|$Sendmail_Prog -t") || print STDERR "Mailprogramm konnte nicht gestartet werden\n";
print MAIL "To: $mailto\n";
print MAIL "Subject: $betreff\n\n";
print MAIL "$mailtext\n";
close(MAIL);
# -------> Dankeseite an Browser senden:
print "Location: $adresse\n\n";
Das Skript stammt von Stefan Münz und ich habe es nur für meine Dinge ein wenig verändert. Aber das seht ihr ja, wenn ihr den Quelltext der HTML-Seite anschaut.
Mein Hoster ist Hosteurope und die haben mir noch nicht geantwortet. Ich habe alle Dinge beachtet (755...), doch das funktioniert nicht.
Findet irgendjemand den Fehler? Danke für eure Hilfe.
Datum: 07.03.2007-10:41
