Du kannst mithilfe von \n den Sendmail Befehl manipulieren, um es zum spammen zu benutzen.
Ich hatte übersehen, daß Dein Empfänger nicht variabel ist, was schon mal ganz praktisch ist, aber parse Empfänger, Absender und Betreff trozdem besser nach \n.
Ersetzt alle \n durch nichts in $var:
$var =~ s/\n//g;
Also wie folgt??
...
-------> interne Daten aus den erwarteten hidden-Feldern auslesen:
my $delimiter = ':';
my $mailto = 'webapprentice@junkpile.de';
$mailto =~ s/\n//g;
my $returnhtml = $query->param('return');
my $subject = 'junkpile.de';
$subject =~ s/\n//g;
...
-------> E-Mail versenden:
my $from=$query->param('absender');
$from =~ s/\n//g;
open(MAIL,"|$Sendmail_Prog -t") || print STDERR "Mailprogramm konnte nicht gestartet werden\n";
print MAIL "To: $mailto\n";
print MAIL "From: $from\n";
print MAIL "Subject: $subject\n\n";
print MAIL "$mailtext\n";
close(MAIL);
aber wozu ich fixe Werte wie empfänger und subject parsen soll, hab ich noch nicht verstanden. Wie soll das gehen den Sendmail mit /n zu manipulieren??
taucher.