Email mit Anhang senden --> Anhang ist leer - #137668 (Netzwerkprogrammierung und Netzwerke mit Perl)

2010-05-27 19:29

User since
2003-08-04
12208 Artikel
Admin1

Guest Danni
Das reicht aber leider nicht. Wenn ich das @file_content korrekt setze bekomme ich als Anhang an die Mail nicht mehr "test.txt" sondern "test.txt DATA"...komisch....aber auch diese Datei ist leer.

nun, datasend() nimmt soweit ich das sehe, ein einziges argument entgegen.

du hast in @file_content die liste von zeilen.

was du übergeben musst, ist einen skalar, der alle zeilen aneinandergehängt beinhaltet.
was du jetzt aber stattdessen gemacht hast, ist, das array mit den zeilen übergeben, und datasend() nimmt dann halt nur die erste zeile als argument.

du musst entweder gleich alles in einen skalar einlesen oder später die zeilen aus @file_content zu einem string zusammenfügen.
wie lange programmierst du denn schon perl?

Code (perl): (dl )

my $file_content = do { local $/; <DATA> };
# oder
my @file_content = <DATA>;
my $string = join '', @file_content;

Quote
Zwecks MIME::LITE --> würde ich gerne nutze ist nur auf dem Server nicht drauf wo ich aktuell probiere. Und installieren kann ich da leider nichts

es behaupten immer wieder viele leute "ich kann nix nachinstallieren".
das ist aber in vielen fällen ein trugschluss.
bitte einmal lesen: Wiki:

ModuleWieInstalliereIchEinModul

MIME::Lite ist pureperl, es sollte also mit der kopier-variante funktionieren.

Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:

Wie frage ich & perlintro Wiki:

brian's Leitfaden für jedes Perl-Problem