Perl

Load an Email from MIME Text in a String

Demonstrates the Chilkat Email.SetFromMimeText method, which loads the email from MIME text (such as the contents of a .eml file) held in a string. On success, it replaces the entire current email. This example serializes one email to MIME with GetMime, then reconstructs it in a second object.

Background: This is the in-memory (string) counterpart to LoadEml, which reads MIME from a file. It is handy when the raw message text arrives from somewhere other than the filesystem — a database column, an HTTP response, or a message queue — letting you parse it straight into a fully populated Email object.

Chilkat Perl Downloads

Download Chilkat for Perl

Perl

use chilkat();

$success = 0;

#  Demonstrates the SetFromMimeText method, which loads the email from MIME text (such as
#  the contents of a .eml file) held in a string.  On success, it replaces the entire
#  current email.

#  Build a source email and get its MIME text.
$source = chilkat::CkEmail->new();
$source->put_Subject("Source message");
$source->put_From('alice@example.com');
$source->put_Body("Hello from MIME text.");
$mimeText = $source->getMime();

#  Load a new email object from the MIME text.
$email = chilkat::CkEmail->new();
$success = $email->SetFromMimeText($mimeText);
if ($success == 0) {
    print $email->lastErrorText() . "\r\n";
    exit;
}

print "Loaded subject: " . $email->subject() . "\r\n";