Mail in Perl verschicken
Montag, 02. September 2002 16:07
open(MAIL, "|/usr/sbin/sendmail -t");
print MAIL "From: ich\@meine-domain.de\n";
print MAIL "To: empfaenger\@andere-domain.de\n";
print MAIL "Cc: kopie.empfaenger\@andere-domain.de\n";
print MAIL "MIME-Version: 1.0\n";
print MAIL "Subject: Titel meiner EMail\n\n";
print MAIL "Hallo, dies ist eine Email von mir!";
close(MAIL);
print MAIL "From: ich\@meine-domain.de\n";
print MAIL "To: empfaenger\@andere-domain.de\n";
print MAIL "Cc: kopie.empfaenger\@andere-domain.de\n";
print MAIL "MIME-Version: 1.0\n";
print MAIL "Subject: Titel meiner EMail\n\n";
print MAIL "Hallo, dies ist eine Email von mir!";
close(MAIL);