SMTP Mailversand - #37145 (Netzwerkprogrammierung und Netzwerke mit Perl)

SichlMichl

2006-02-28 10:53

User since
2006-02-28
6 Artikel
BenutzerIn
[default_avatar]

Hallo zusammen,

ich habe ein Problem mit dem Mailversand durch Perl.

Bei der ganzen Geschichte handelt es sich um ein Skript, das eine Mailbenachrichtigung sendet, wenn es aufgerufen wurde.
Die ganze Geschichte muss leider auf Windows laufen.
soweit bin ich schon:

Code: (dl )

use strict;
use warnings;
use Net::SMTP;

my $mailServer = "mailHost";
my $absender = "test_\@test.de";
my $empfaenger = "versuch\@versuch.de";
my $betreff = "Betreff";
my $nachricht = "Nachricht";
 
my $smtp = Net::SMTP->new('$mailhost');
$smtp->mail("$absender");
$smtp->to($empfaenger);
$smtp->data();
$smtp->datasend("From: $absender \n");
$smtp->datasend("To: $empfaenger \n");
$smtp->datasend("\n");
$smtp->datasend($nachricht);
$smtp->dataend();
$smtp->quit;

So, jetzt wirft er mit immer die folgende Fehlermeldung:

Code: (dl )

Can't call method "mail" on an undefined value at mail.pl line 12.

Weiß da jemand weiter? Ich bin grad ein bisschen am verzweifeln...

Danke schon mal im voraus...

Grüße
Michl\n\n