Fehlermeldung beim Versenden von Mails: MIME::Lite (page 2) (Fragen zu Perl-Modulen)

[thread]8729[/thread]

Fehlermeldung beim Versenden von Mails: MIME::Lite (page 2)

Reader: 1

renee

2007-02-07 12:59

User since
2003-08-04
14371 articles
ModeratorIn

Nach der Doku sollte es so gehen:

Code: (dl )

        my $message = MIME::Lite->new(
              From => 'skript.pl',
              To => $recipient,
              Subject => "Meine Subject-Zeile",
              Data => $arrayref,
      );

Aber um mehr sagen zu können, müsstest Du etwas Code posten...

OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/

Duff

2007-02-07 13:24

User since
2006-10-06
283 articles
BenutzerIn

user image

Mmh...

also ich rufe die funktion zum Versenden so auf:

Code: (dl )

send($arrayRef);

Die Funktion sieht dann so aus:

Code: (dl )

sub send {
        my $ar=shift;
        my $message_body = $ar;
        for my $recipient($emailliste,$smsliste){
           my $body = $recipient eq $smsliste ? "" : $message_body;
           my $message = MIME::Lite->new(
              From => 'skript.pl',
              To => $recipient,
              Subject => "Meine Subject-Zeile",
              Data => $body,
      );
   $message->send();
}

D'OH
Daniel

Duff

2007-02-07 18:36

User since
2006-10-06
283 articles
BenutzerIn

user image

Habe es nun so gemacht, dass ich vor dem Aufruf der Funktion

Code: (dl )

send()

zuerst die relevanten Daten der ArrayRef in einem neuen Array speichere.
Anschließend referenziere ich das Array (also $arrayRef=\@array), übergebe es an die Funktion send() und nun wird der Inhalt des Arrays ausgegeben.

(Vorher sortiere ich mit Hilfe eines weiteren arrays noch die Ausgabe; @array=sort @Array)

Danke für die bisherigen Hilfestellungen.

D'OH
Daniel

View all threads created 2007-02-06 16:20.