perl - 電子メールから現在のレベルのコンテンツを抽出する CPAN モジュールはありますか

Question

電子メールのプレーン テキスト コンポーネントからコンテンツの即時レベルを抽出する (つまり、引用されたコンテンツと署名ブロックを破棄する) ための最善の試みを行うモジュールを探しています。

私たちはすでにいくつかのコードを持っているので、それを実行する既存のモジュールがない場合は、新しいモジュールの名前のアイデアも歓迎されます (Text::ExtractImmediateLevelOfContentFromEmail少し扱いに​​くいようです)。