Thomas: Sendmail-Emulation bei QMail

Hallo zusammen,

gleich noch einen Beitrag:

Bei der Portierung eines Skripts, welches ne Menge Mails verschicken soll, kommt es zum Problem, dass QMail mit der folgenden Routine keine HTML-Mails verschicken kann:

open(QMAILGO,"|/var/qmail/bin/qmail-inject") || die "QMail fehler oeffnen!";
flock(QMAILGO,2);
print QMAILGO "To: $An\n";
print QMAILGO "From: $Von\n";
print QMAILGO "Return-Path: $Von\n";
print QMAILGO "Errors-To: $Von\n";
print QMAILGO "Subject: $Betreff\n\n";
if ($AHtmlText eq "html")
 {
 print QMAILGO "Content-type: text/html\n\n";
 }
for (@Slines)
 {
 print QMAILGO "$_";
 }
close(QMAILGO) || die "QMail fehler schliessen!";

Wenn ich über eine SENDMAIL-Emulation gehe, klappt es ohne Probleme:

open(SENDMAILGO,"|/usr/sbin/sendmail -f $Von -t") || die "Mail-Fehler oeffnen!";
flock(SENDMAILGO,2);
print SENDMAILGO "Return-Path: $Von\n";
print SENDMAILGO "Errors-To: $Von\n";
if ($AHtmlText eq "html")
 {
 print SENDMAILGO "Content-type: text/html;\n";
 }
print SENDMAILGO "To: $An\n";
print SENDMAILGO "From: $Von\n";
print SENDMAILGO "Subject: $Betreff\n\n";
for (@Slines)
 {
 print SENDMAILGO "$_";
 }
close(SENDMAILGO) || die "Mail-Fehler schliessen!";

Ich würde diese Emulation, aber gern umgehen, weil ich komisches Gefühl in der Magengegend verspüre. Denn es kommt zu Problemen auf der Maschine, die ich nicht erklären kann. ( siehe http://forum.de.selfhtml.org/?t=33875&m=184253 )

Welchen Parameter könnte/müsste ich für Qmail bereit stellen, damit es HTML-Mails verschickt?

Danke schon mal.

Gruss Thomas