MIME::Lite::body_as_string (Netzwerkprogrammierung und Netzwerke mit Perl)

[thread]18238[/thread]

MIME::Lite::body_as_string

Tags: perl5 Ähnliche Threads

Leser: 12

Articles: hide open all | hide show old branches

+4 replies
Gast Schneehase

2013-03-29 12:40
Hallo,

ich möchte mit MIME::Lite::HTML eine Website (inkl. Bilder etc.) per Mail versenden. Funktioniert auch.

Wo ich eine Frage habe ist die Funktion MIME::Lite::body_as_string, diese hat m.M.n. einen Fehler. Es werden Teile des E-Mail-Header mit ausgegeben und dies stört das Weiterverarbeiten des HTML mit HTML::HeadParser.
Code (perl): (dl )

1 2 3 4 5 6 7 8 9 10 11 12 13

#!/usr/bin/env perl use MIME::Lite::HTML; use HTML::HeadParser; my $mlh = MIME::Lite::HTML->new; my $part=$mlh->parse("http://www.perl-community.de"); print $part->body_as_string; my $hhp = HTML::HeadParser->new; $hhp->parse($part->body_as_string); print $hhp->header('Title');
Last edited: 2013-03-29 13:16:25 +0100 (CET)
- +3 replies
- GwenDragon
  
  2013-04-01 12:31
  User since
  2005-01-17
  14866 Artikel
  Admin1
  body_as_string hat keinen Fehler. Es liefert den Body und der besteht bei einem Multipart aus MIME-Headern und HTML.
  
  Dann schmeiß halt den Header so raus. Muss du selbst überprüfen, was dein Body liefert.
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7
  
  my $body = $part->body_as_string; $body =~ s/\QThis is a multi-part message in MIME format.\E$//; $body =~ s/^$//; $body =~ s/--.+$//; $body =~ s/^Content-Disposition.+$//; $body =~ s/^Content-Transfer-Encoding.+$//; $body =~ s/^Content-Type.+$//;
  
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - +2 replies
  - Gast Schneehase
    
    2013-04-01 12:55
    
    Ich nehme (nun) LWP::UserAgent und HTTP::Request, um die Website zu kopieren und übergebe die Kopie dann an MIME::Lite::HTML::parse. Mir kam das nur zu umständlich vor.
    
    Nun weiss ich aber, warum ich es wie oben gesagt tue.
    
    2013-04-01T10:31:13 GwenDragon
    body_as_string hat keinen Fehler. Es liefert den Body und der besteht bei einem Multipart aus MIME-Headern und HTML.
    
    Last edited: 2013-04-01 13:49:53 +0200 (CEST)
    - GwenDragon
      
      2013-04-01 13:54
      
      User since
      2005-01-17
      14866 Artikel
      Admin1
      
      Du hast versucht ein Modul für einen Zweck zu verwenden, für den es nicht vorgesehen war.
      
      Die Lösung mit LWP hätte ich dir auch vorgeschlagen, wenn die Ersetzung dir nicht gefallen hätte, zu unflexibel gewesen wäre. Aber du hast es ja auch so rausgefunden ;)
      die Drachin Gwen
      
      Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten

View all threads created 2013-03-29 12:40.