Martiano: neue *pl erstellen

Beitrag lesen

Dann sieh in den error.log auf dem Server nach.

kurze Zwischenfrage, ich finde kein error.log auf dem server.
Per FTP-Zugang finde ich keine solche Datei.

Wie muss ich das anfordern?

Hier habe ich das von dir vorgeschlagene eingefügt. Wenn ich das richtig verstehe dann soll ich es erstmal so ausprobieren:

#!/usr/bin/perl  
use strict;  
use warnings;  
use CGI::Carp qw(fatalsToBrowser);  
my $returnhtml = "http://www.meine-url.de/submit.htm";  
my $Sendmail_Prog = "/usr/sbin/sendmail -t -i";  
my $mailto = 'meine@email.de';  
use CGI;  
my $query = new CGI;  
my @names = $query->param;  
my $delimiter = $query->param('delimiter');  
my $returnhtml = $query->param('return');    # ---> URL für Dankeseite  
my $subject = $query->param('subject'); # ---> E-Mail-Subject  
$subject =~ s/\s/ /g;  
use Encode qw/encode decode/;  
$subject = decode('MIME-B', $subject);  
my $mailtext = "";  
foreach my $name(@names){  
   @values = "";  
  
my @values=();  
  
   @values = $query->param($name);  
   if($name ne "return" && $name ne "subject" && $name ne "delimiter") {  
     foreach my $value (@values) {  
       $mailtext = $mailtext.$name;  
       $mailtext = $mailtext.$delimiter;  
       $mailtext = $mailtext.$value."\n";  
     }  
   }  
 }  
  
# -------> E-Mail versenden:  
open(MAIL,"|$Sendmail_Prog -t")  
      or die("Fehler beim Aufruf des mailprogramms $!");  
print MAIL "To: $mailto\r\n";  
# Wir geben Network-Newlines aus!  
print MAIL "Subject: $subject\r\n";  
# schliesse die Header-Sektion ab:  
print MAIL "\r\n";  
print MAIL "$mailtext\n";  
close(MAIL);  
print "Content-type: text/plain; charset=UTF-8\r\n\r\n";  
print "Testausgabe, Dankeseite\n";  
exit;

my @values=();

habe ich auch reingesetzt.

print "Content-type: text/plain; charset=UTF-8\r\n\r\n";

print "Testausgabe, Dankeseite\n";

exit;

muss ich Testausgabe und Dankeseite durch andere Eingaben ersetzen wenn ich es testen will?

Erst nach Erfolg

die untenstehende Angabe wieder austauschen gegen das Eingefügte, so wie ich dich verstanden habe.

Wir haben es mit HTTP-Header zu tun:-> Network-Newlines

print "Location: $returnhtml\r\n\r\n";

Das kann an diesem Punkt fehlschlagen wenn Warnungen ausgegeben werden.

Es kann aber nicht ein ein Location-header UND ein response-body gesendet werden.

verstehe ich nicht ohne mehr zu lernen...

Ich kann weder javascript noch perl.

Dein Problem.

leider, leider   ;-)

falls es zu umfangreich wird bitte sagen, es sollte nur ein Versuch sein den unzuverlässigen E-mail Client abzuschalten.
Da ich gesehen hatte wie kurz so ein CGI ist dachte ich dass sich die Hilfe im Rahmen hält.

schönen Dank bis hierher