Perl

Serialize MIME to a String

Demonstrates the Chilkat Mime.GetMime method, which serializes and returns the complete MIME entity — headers, body, multipart boundaries, and all descendants — as a string. It takes no arguments.

Background: This produces the finished MIME text ready to send, store, or hand to another component — the inverse of loading. The whole tree is emitted, including generated multipart boundaries. Because it returns a string, it is best for text-safe content; when the body may contain raw binary bytes, serialize with GetMimeBd to a BinData instead so nothing is altered.

Chilkat Perl Downloads

Download Chilkat for Perl

Chilkat2 Perl

use strict;
use warnings;
use Chilkat2;

# Demonstrates the Mime.GetMime method, which serializes and returns the complete MIME entity
# (headers, body, multipart boundaries, and all descendants) as a string.  It takes no
# arguments.

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

# Build a simple MIME entity.
my $success = $mime->SetBodyFromPlainText('Hello, this is the message body.');
if (!$success) {
    print $mime->LastErrorText, "\n";
    exit;
}

# Serialize it to a string.
my $mimeText = $mime->GetMime();
if (!$mime->LastMethodSuccess) {
    print $mime->LastErrorText, "\n";
    exit;
}

print $mimeText, "\n";