MIME base64-Datei per PERL versenden - #113006 (Netzwerkprogrammierung und Netzwerke mit Perl)

raptor

2008-08-01 21:37

User since
2008-07-31
4 Artikel
BenutzerIn
[default_avatar]

GwenDragon+2008-08-01 12:22:34--

Dann verwende bitte Net::SMTP zu versenden.

Vielen Dank für deinen Tipp. Hasst du mir vielleicht ein Codebeispiel wie ich meine
Datei an Net::SMTP gebe?
In den Beispielen die ich über Google gefunden habe, werden die Mails per Net::SMTP von
Grund auf selbst aufgebaut:

Code (perl): (dl )

use Net::SMTP;

    $smtp = Net::SMTP->new('mailhost');

    $smtp->mail($ENV{USER});
    $smtp->to('postmaster');

    $smtp->data();
    $smtp->datasend("To: postmaster\n");
    $smtp->datasend("\n");
    $smtp->datasend("A simple test message\n");
    $smtp->dataend();

    $smtp->quit;