Take a look at MIME::Tools at cpan.org, it should do pretty much what you want.

-- 
Joost       downtime n. The period during which a system
            is error-free and immune from user input.
[download]