in reply to Multipart/Alternative

You'd be a lot happier in life if you'd just grab the MailTools package. (try MIME::Entity especially.)

--
$you = new YOU;
honk() if $you->love(perl)

In Section Seekers of Perl Wisdom