NET::SMTP zeigt falschen Empfänger
Pitt
- cgi
hi,
ich habe da ein keines problem mit modul NET::SMTP.
wenn ich jetzt eine email versende und sie nem emailprogramm abrufe, steht da wo der absender stehen sollte die empfänger adresse.
also es sieht dann so aus:
Absender: mail@host.de
Empfänger: mail@host.de
der quellcode;
#!/usr/bin/perl -w
use Net::SMTP;
$smtp = Net::SMTP->new('mailto.t-online.de');
$smtp->mail("service@dreamprices.de");
$smtp->to("peter_demko@t-online.de");
$smtp->data();
$smtp->datasend("To: peter_demko@t-online.de\n");
$smtp->datasend("Subject: Hallo\n");
$smtp->datasend("\n");
$smtp->datasend("A simple test message\n");
$smtp->dataend();
$smtp->quit;
was ist falsch an dem prog
Halihallo Pitt
$smtp->data();
$smtp->datasend("To: peter_demko@t-online.de\n");
Füge hier einen gültigen From: Header ein.
$smtp->datasend("Subject: Hallo\n");
$smtp->datasend("\n");
$smtp->datasend("A simple test message\n");
$smtp->dataend();
was ist falsch an dem prog
Die methoden mail und to interessiert nur den SMTP-Server, vom Client sind diese Daten
nicht sichtbar. Alles was der Client sieht, ist der Mail-Quelltext und in diesem hast
du keinen Absender. Was der Client ohne diesen From: Header macht, scheinst du bemerkt
zu haben: Er setzt einfach den Empfänger dort ein...
Viele Grüsse
Philipp
Halihallo Pitt
$smtp->data();
$smtp->datasend("To: peter_demko@t-online.de\n");Füge hier einen gültigen From: Header ein.
ja das habe das habe ich schon versucht und entweder ist der absender immer noch der gleiche wie der empfänger oder es fehlt der empfänger und der betreff.
Halihallo Pitt
$smtp->data();
$smtp->datasend("To: peter_demko@t-online.de\n");
Füge hier einen gültigen From: Header ein.
ja das habe das habe ich schon versucht und entweder ist der absender immer noch der gleiche wie der empfänger oder es fehlt der empfänger und der betreff.
Das klingt, als ob du etwas falsch machst... Zeige nochmals den überarbeiteten Code.
Was kommt eigentlich beim Client an? - Stehen dort einige Header fälschlicherweise im
Body? - Benutzt du einen Mac zum versenden (IMHO werden dort die CR's nicht in CRLF
umgewandelt, sodass es dem Standard entspricht).
Viele Grüsse
Philipp
Das klingt, als ob du etwas falsch machst... Zeige nochmals den überarbeiteten Code.
hier der code:
#!/usr/bin/perl -w
use Net::SMTP;
$smtp = Net::SMTP->new('mailto.t-online.de');
$smtp->mail("service@valeuua.de");
$smtp->to("homeadresse@t-online.de");
$smtp->data();
$smtp->datasend("From: service@valeuua.de\n"); ###das hier eingefügt
$smtp->datasend("To: homeadresse@t-online.de\n");
$smtp->datasend("Subject: Hallo\n");
$smtp->datasend("\n");
$smtp->datasend("A simple test message\n");
$smtp->dataend();
$smtp->quit;