Anonymous Monk,
I have done something similar with Mail::Audit, which is capable of handling different body types (MIME::Entity). There is some code in this to process the body of the message, regardless of type. I do not know how/if Mail::Internet handles mixed mode MIME message bodies which was a requirement for me at the time.

Cheers - L~R