Problem mit Net::SMTP: nicht nachvollziehbar (Netzwerkprogrammierung und Netzwerke mit Perl)

jan10001

2003-09-25 02:21

User since
2003-08-14
962 Artikel
BenutzerIn
[default_avatar]

Code: (dl )

my $smtp = Net::SMTP->new('smtp.hlf-online.de');

Änderst du eigentlich den SMTP Server?

jan10001

2003-09-25 02:35

User since
2003-08-14
962 Artikel
BenutzerIn
[default_avatar]

Frage mal anders wen gehört dieser SMTP Server, deinen Provider?

jan10001

2003-09-25 03:02

User since
2003-08-14
962 Artikel
BenutzerIn
[default_avatar]

Aha, damit ist es klar.

Um Mißbrauch zu verhindern sind viele SMTP Server so konfiguriert, das sie nur Anfragen von Clients entgegen nehmen die im gleichen Netzwerk sind. Oder von Clients die eine Email an jemanden übergeben der dem SMTP Server bekannt ist. (Also alle Emails an Adressen die mit @hlf-online.de enden, würden angenommen.)

Jetzt hast du zwei Möglichkeiten:
1. verwende einen anderen SMTP Server
2. Sofern der SMTP Server ne Anmeldung akzeptiert kannst du mit Net::SMTP_auth deinen Benutzernamen und Passwort senden, dann nimmt er die Emails auch an.\n\n

jan10001

2003-09-25 11:10

User since
2003-08-14
962 Artikel
BenutzerIn
[default_avatar]

Keine Ahnung da müßtest du mal bei Cpan nachschauen.

format_c

2003-09-25 11:56

User since
2003-08-04
1706 Artikel
HausmeisterIn

Ach jetzt hab ich sie gesehen.

Danke.
BTW: Ich habe grad die Funktion cc gesehen und das ist eigentlich das was ich mit recipient erreichen wollte.
Kann mir jemand sagen was recipient genau macht oder ist?

Gruß ALex

Effizente Linuxshell

format_c

2003-09-25 18:37

User since
2003-08-04
1706 Artikel
HausmeisterIn

Aha ich werd die Punkte dann mal heute abend abklappern.
Gruß Alex

Effizente Linuxshell

format_c

2003-09-25 01:03

User since
2003-08-04
1706 Artikel
HausmeisterIn

Ich habe folgenden Codeauschnitt in einem etwas komplexeren Script auf dem Server liegen.

Code: (dl )

use Net::SMTP;

my @mailreceiver = ('format_c@perl-community.de','erik@perl-community.de','gernot.havranek@bertelsmann.at');

my $smtp = Net::SMTP->new('smtp.hlf-online.de');
$smtp->mail($mailreceiver[0]);
$smtp->to($mailreceiver[0]);
$smtp->recipient(@mailreceiver[1..$#mailreceiver]);
$smtp->data();
$smtp->datasend('To: ' . join(', ',@mailreceiver) . "\n");
$smtp->datasend('From: Absender',"\n");
$smtp->datasend('Subject: Test->Ignorieren',"\n");
$smtp->datasend("\n");
$smtp->datasend("================================================================================\n");
$smtp->dataend();
$smtp->quit();

Führe ich diesen Abschnitt separat auf meinem rechner aus funktioniert er der selbe Code auf dem Server funktioniert nicht.

Eine Ahnung?

Gruß Alex\n\n

Effizente Linuxshell

format_c

2003-09-25 02:28