[MIME::Parser] Attachment gezielt abspeichern

Servus!

Ich stehe gerade auf dem Schlauch und sehen den Wald vor
lauter Bäumen, die Google mir aufstellt, nicht mehr.

Ich habe also ein Script, das eine mail nach allen Regeln
der Kunst rekursiv durchpflügt, vgl.:
http://piology.org/perl/fixmail.pl.html

Dieses Script verrichtet seit Jahren klaglos seinen Dienst.
Nun möchte ich als kleine Abwandlung in der Funktion analyze
die zu löschenden Attachments noch abspeichern (natürlich
passend dekodiert, wenn möglich mit dem vorgegebenen Namen,
aber nur, wenn dadurch keine existierende Datei
überschrieben wird;-). Irgendwie finde ich gerade nicht, wie
ich das am einfachsten hinbekomme.

pi
--=20
Attachment? Nein: http://piology.org/ILOVEYOU-Signature-FAQ.html

Re: [MIME::Parser] Attachment gezielt abspeichern

am 2006-06-26 14:39 schrieb Boris 'pi' Piwinger:

> Ich habe also ein Script, das eine mail nach allen Regeln
> der Kunst rekursiv durchpflügt, vgl.:
> http://piology.org/perl/fixmail.pl.html
>
> Dieses Script verrichtet seit Jahren klaglos seinen Dienst.
> Nun möchte ich als kleine Abwandlung in der Funktion analyze
> die zu löschenden Attachments noch abspeichern (natürlich
> passend dekodiert, wenn möglich mit dem vorgegebenen Namen,
> aber nur, wenn dadurch keine existierende Datei
> überschrieben wird;-). Irgendwie finde ich gerade nicht, wie
> ich das am einfachsten hinbekomme.

Ich zerschnibbel Mails mit

use MIME::Explode;

my $explode = MIME::Explode->new(
output_dir => "tmp",
mkdir => 0755,
decode_subject => 1,
check_content_type => 1,
content_types => ["image/gif", "image/jpeg", "image/bmp"],
types_action => "exclude"
);

Ein geniales Modul, dass in "outp_dir" deiner Wahl alle MIME-Atömchen
ablegt. Die komplette Struktur der explodierten E-Mail ist sehr
übersichtlich in einem Hash abzuholen, incl. aller Header und dem ganzen
Kram. Das Eintauchen in tiefere MIME-Strukturen einer komplexen E-Mail
übernimt das Modul ebenso.

Attachments - so in der E-Mail welche drin waren - sind abholbereit in
der "outp_dir" bereitgestellt.

Werf mal n' Blick drauf, lohnt sich.

Peter

Re: [MIME::Parser] Attachment gezielt abspeichern

Peter Velan wrote:

>use MIME::Explode;

Sicher ganz interessant, allerdings würde ich jetzt erst
einmal lieber mit dem Teil arbeiten, den ich kenne.

pi
--=20
Attachment? Nein: http://piology.org/ILOVEYOU-Signature-FAQ.html