Perl

Set a MIME Body from XML

Demonstrates the Chilkat Mime.SetBodyFromXml method, which sets the body as XML, changes the media type to text/xml, and selects an appropriate transfer encoding. The only argument is the XML text.

Background: This produces an XML-typed part, common in machine-to-machine messaging — SOAP, AS2/EDI payloads, structured data attachments. Marking the content text/xml lets the receiver route and parse it correctly, and Chilkat picks a transfer encoding that preserves the XML across the transport.

Chilkat Perl Downloads

Download Chilkat for Perl

Perl

use chilkat();

$success = 0;

#  Demonstrates the Mime.SetBodyFromXml method, which sets the body as XML and changes the media
#  type to text/xml.  The only argument is the XML text.

$mime = chilkat::CkMime->new();

$xml = "<note><to>Bob</to><from>Alice</from><body>Hello</body></note>";
$success = $mime->SetBodyFromXml($xml);
if ($success == 0) {
    print $mime->lastErrorText() . "\r\n";
    exit;
}

print "Content-Type: " . $mime->contentType() . "\r\n";