Perl

Load MIME Object from Email Object

See more Email Object Examples

Demonstrates how to load a Chilkat Mime object from a Chilkat Email object. (Copies the email into a Mime object.) Perl

use chilkat();

$success = 0;

$email = chilkat::CkEmail->new();
$success = $email->LoadEml("qa_data/eml/sample.eml");

# Write the full MIME of the email to a StringBuilder.
$sbMime = chilkat::CkStringBuilder->new();
$email->GetMimeSb($sbMime);

# Load the MIME object from the StringBuilder
$mime = chilkat::CkMime->new();
$success = $mime->LoadMimeSb($sbMime);

print $mime->getMime() . "\r\n";