in reply to Stripping the text part alone from mail

There are a number of suitable modules, but have a look, for example, at Email::MIME.
  • Comment on Re: Stripping the text part alone from mail