better way of extracting mime multipart ?

The reformime utility in Maildrop

         http://www.flounder.net/~mrsam/maildrop/

does a nice job of extracting the plain text portion of a 
multipart/alternative message.
I would like to use this utility in procmail, and have the following 
code snippet working.

:0: tmp.lock
* ^Mime-Version: 1.0
* ^Content-Type: multipart/alternative;
{
   :0 wc
   | formail -IIn-Reply-To: -ICc: >tmp.request

   :0 fbw
    | cat >/dev/null ; \
    reformime -e -s 1.1 -r8 <tmp.request

    XYZ=rm -rf tmp.request
}

The reformime utility extracts the plain text portion, but never 
returns the header.  And yet I must pass it the headers for reformime 
to figure things out.
My code snippet is sort of ugly, and was wondering if anybody would 
like to suggest a cleaner method  of accomplishing this.
Thanks

_______________________________________________
procmail mailing list
procmail(_at_)lists(_dot_)RWTH-Aachen(_dot_)DE
http://MailMan.RWTH-Aachen.DE/mailman/listinfo/procmail