1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
#!/usr/local/bin/perl
use Mail::Sendmail;
%mail = ( To => 'osm@tappenbeck.net',
From => 'osm2go@tappenbeck.net',
Message => "This is a very short message"
);
$mail{auth} = {user=>'meine@email-adresse.net', password=>"xxxxxxx", required=>1 };
$mail{Smtp} = 'smtp.1und1.de';
sendmail(%mail) or die $Mail::Sendmail::error;
print "OK. Log says:\n", $Mail::Sendmail::log;
QuoteZ:\osmRefControlling\ToolVerzeichnis\perl>perl email.pl
RCPT TO: error (550 must be authenticated)
Quotehttp://search.cpan.org/~mivkovic/Mail-Sendmail-0.7...No suport for the SMTP AUTH extension.
2014-01-23T14:51:19 GwenDragonoder noch besser MIME::Lite, das kann gut Mails zusammenbauen (anhänge, HTML, Text) und versenden.