Anhang mit Perl klappt nicht überall

[Struppi]

$MIMEservice = MIME::Lite->new(
From => $Email,
To =>$YourEmail, Subject =>$in{'mysubject'},
Type => 'text/plain', Encoding => 'quoted-printable',
Data => $TXT
);

Ja super, und warum liest du nicht die Anleitung des Moduls?

open (Postal, "|$MailProgram $YourEmail") || die "Can't open $mailprog!\n";

Irgendwie machen deine Variabeln den Eindruck, als ob hier ein grosses durcheinander herrscht. Einmal heißt es $MailProgram, dann $mailprog. Ich empfehle dir Variabeln immer mit Kleinbuchstaben zu beginnen, die Warnungen einzuschalten und use strict zu verwenden. Interessant dazu ist diese Seite der Dokumentation: http://perldoc.perl.org/perlstyle.html

Struppi.