For mainipulating email messages check out MIME::Tools which includes MIME::Parser to get any part/s or a message that you want and MIME::Entity which lets you consrtuct multipart messages.

cheers

tachyon

s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print