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

Chilkat2 Perl

use strict;
use warnings;
use Chilkat2;

# 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.

my $mime = Chilkat2::Mime->new;

my $xml = '<note><to>Bob</to><from>Alice</from><body>Hello</body></note>';
my $success = $mime->SetBodyFromXml($xml);
if (!$success) {
    print $mime->LastErrorText, "\n";
    exit;
}

print 'Content-Type: ', $mime->ContentType, "\n";