Email versenden über SMTP statt /usr/sbin/sendmail ?

[Philipp Hasenfratz]

ich hab da noch eine kleine Frage und zwar auf meinem Server funktioniert leider sendmail nicht, und ich würde jetzt gern über einen smtp Server senden, nur weis ich leider nicht wie das Script dazu aussehen soll. Ich hab zwar schon in perldoc.com unter NET:SMTP nachgesehen, bin aber leider auch nicht viel schlauer. Kann mir jemand ein kleines Beispiel geben, woran ich micht orientieren kann,

hab's nie getestet, aber in der Doku steht's mehr oder weniger gut beschrieben:

#!/usr/local/bin/perl -w

use Net::SMTP;

$smtp = Net::SMTP->new('mail.gmx.net');

$smtp->mail('[e-mail]');
    $smtp->to('[e-mail]');

$smtp->data();
    $smtp->datasend("To: [e-mail]\n");  # das wird der Mailheader
    $smtp->datasend("\n");  # der Header wird mit \n\n vom Content getrennt!
    $smtp->datasend("Hier kommt der Text!\n");
    $smtp->dataend();

$smtp->quit;