Have a look on MIME::Tools and MIME::Entity. Parse the message, then check the parts to see if they are text/plain, pick up the parts you need. For HTML-only messages you'll probably have to decide if you want to ignore them or transform HTML to text.