perl mail parser

[avb]

Нужен скрипт, который мог бы на вход получить текст письма, убрать из него все mime и qp и перекодировать его в utf-8.

Подскажите библиотеку для парсинга писем. Если это все реализуется, то население jabber.org.by получит mail2jabber гейт.

[Eugene]

Самое простое Email::Simple - Simple parsing of RFC2822 message format and headers.
Для более навороченной обработки могут подойти
Mail::Message::Part или Mail::Message::Body.

Перекодировку проще всего делать с помощью модуля Encode.

[avb]

да, я уже нашел Email::Simple.

перекодировку можно впринципе и iconv'ом сделать.


Вот столкунулся с раскодированием сабжектов.

Страшная штука, это mime и qp.

[mend0za]

в одном из проектов раскодировал вручную, согласно irc, аттачи и тело письма

был не слишком испуган.

[avb]

да уже все раскодировал, осталась проблема с перекодировкой. :-/

[Lioxa]

А в чём собственно проблема?

Если как это сделать на перле, то

use Encode qw/from_to/;

from_to($text, $fromenc, $toenc);

результат не возвращает, а меняет текст в самой переменной

[avb]

походу проблема где-то в скрипте, который непосредственно отсылает сообщение, а не у меня. Решил лучше написать новую программу. на питоне.

[myst]

Очень, очень правильная мысль. Змеюка - наш выбор! :)

[avb]

доделал. Всем спасибо за помощь.

питон таки с utf8 лучше работает.