Hallo,
gleich vorweg, ich bin amsoluter Anfänger, also alles bitte gaaanz langsam erklären und nicht lachen
Ich möchte ein Formular auf meine Homepage setzen und habe folgenden Code in meinem CGI-Ordner:
_#!/usr/bin/perl
$Sendmail_Prog = „/usr/sbin/sendmail“;
$mailto = „[email protected]“;
use CGI;
$query = new CGI;
@names = $query->param;
$delimiter = $query->param(‚delimiter‘); # —> Begrenzerzeichen zwischen name und value
$returnhtml = $query->param(‚return‘); # —> URL für Dankeseite
$subject = $query->param(‚subject‘); # —> E-Mail-Subject
$subject =~ s/\s/ /g;
$mailtext = „“;
foreach(@names) {
$name = $_;
@values = „“;
@values = $query->param($name);
if($name ne „return“ && $name ne „subject“ && $name ne „delimiter“) {
foreach $value (@values) {
$mailtext = $mailtext.$name;
$mailtext = $mailtext.$delimiter;
$mailtext = $mailtext.$value."\n";
}
}
}
open(MAIL,"|$Sendmail_Prog -t") || print STDERR „Mailprogramm konnte nicht gestartet werden\n“;
print MAIL „To: $mailto\n“;
print MAIL „Subject: $subject\n\n“;
print MAIL „$mailtext\n“;
close(MAIL);
print „Location: $returnhtml\n\n“;_
Ich habe das ganze aus dem Internet übernommen, also im keine Ahnung, was da steht. Die E-Mail-Adresse habe ich hier anonymisiert.
Das Ganze ist im *.pl-Format abgespeichert.
Dann habe ich die HTML-Seite:
… Formular …
Ich fürchte, ich habe hier ein ganz großes Durcheinander…
Die XXX sind von mir. Ich habe noch einen absoluten Pfad, wo / wie muss der angegeben werden? Vermutlich findet die html-Datei die *.pl-Datei gar nicht…
Nun erscheint das Formular schon richtig, allerdings funktioniert weder das zurückstellen, noch das Abschicken.
Wer mag dieses Chaos entziffern?
Gruß
Tato