Formmailer... Ich werde noch verrückt..

[Josef Reichardt]

Hi!

Irgendwie klappt es immer noch nicht, ich kapier das nicht!
Was ist den noch falsch?

send-mail.pl :

use Net::SMTP;
$smtp = Net::SMTP->new('localhost');
$smtp->mail($ENV{USER});
$smtp->to('$mailto');
$smtp->data();
$smtp->datasend("To: $mailto\n");
$smtp->datasend("Subject: $subject\n\n");
$smtp->datasend("$mailtext\n");
$smtp->dataend();
$smtp->quit;
print "Location: $returnhtml\n\n";
if (grep { $mailto eq $_ } @all_mailq) {
my @all_mails = ('[e-mail]', '[e-mail]');
} else {
print header();
print "<h1>Nicht erlaubte Emailadresse!</h1>";
}

Hoffe auf Hilfe....

Josef