Email::MIME::XPath 携帯で添付ファイル＋本文空白だとbodyがとれない

    my ($email_body_text) = $parsed->xpath_findnodes('//*[@content_type=~"^text"][1]');
    $email_body_text->body;

こんなかんじだと添付ファイル月で、text本文が無い場合、bodyメソッドが無いとエラーにされる
画像はとれるけど、本文がなんでとれないんだ　もうevalでいいのか？！　いいんだよ！

http://mobilehacker.g.hatena.ne.jp/tomi-ru/comment?date=20080711