Text::Quoted - extract the structure of a quoted mail message - View it on GitHub