Mail::Header for headers
The message body depends on plain text\mime. If plain, then you can do it with no modules v. easily if you know what an email message looks like.

$ perldoc perldoc