--MIMEBoundaryurn_uuid_5922B37D7F43649CB512578951566415053
Content-Type: application/xop+xml; charset=utf-8; type="text/xml"
Content-Transfer-Encoding: binary
Content-ID: <0.urn:uuid:5922B37D7F43649CB512578951566415054>

<XML RESPONSE GOES HERE>
--MIMEBoundaryurn_uuid_5922B37D7F43649CB512578951566415053
Content-Type: application/zip
Content-Transfer-Encoding: binary
Content-ID: <urn:uuid:A86D19E1CDE87B2FD01257895160515>

^_~K^H^H­>üJ^@^Ctest^@^C^@^@^@^@^@^@^@^@^@
--MIMEBoundaryurn_uuid_5922B37D7F43649CB512578951566415053--

##</code><code>##

my $parser = new MIME::Parser ();
my $ent = $parser->parse_open ($response_file);

$ent->dump_skeleton;
print "~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n";
print $ent->stringify_body;

##</code><code>##

Content-type: text/plain
Effective-type: text/plain
Body-file: ./msg-11891-1.txt
--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~
<XML RESPONSE GOES HERE>
--MIMEBoundaryurn_uuid_5922B37D7F43649CB512578951566415053
Content-Type: application/zip
Content-Transfer-Encoding: binary
Content-ID: <urn:uuid:A86D19E1CDE87B2FD01257895160515>

^_~K^H^H­>üJ^@^Ctest^@^C^@^@^@^@^@^@^@^@^@
--MIMEBoundaryurn_uuid_5922B37D7F43649CB512578951566415053--