Perl

Transition from MailMan.LoadXmlEmail to Email.SetFromXmlText

Provides instructions for replacing deprecated LoadXmlEmail method calls with Email.SetFromXmlText. Perl

use chilkat();

$success = 0;

$mailman = chilkat::CkMailMan->new();

# ...
# ...

$xmlFilePath = "c:/test/example.xml";

# ------------------------------------------------------------------------
# The LoadXmlEmail method is deprecated:

# emailObj is a Email
$emailObj = $mailman->LoadXmlEmail($xmlFilePath);
if ($mailman->get_LastMethodSuccess() == 0) {
    print $mailman->lastErrorText() . "\r\n";
    exit;
}

# ...
# ...

# ------------------------------------------------------------------------
# Do the equivalent using Email.SetFromXmlText.

$sb = chilkat::CkStringBuilder->new();
$success = $sb->LoadFile($xmlFilePath,"utf-8");
if ($success == 0) {
    print $sb->lastErrorText() . "\r\n";
    exit;
}

$email = chilkat::CkEmail->new();
$success = $email->SetFromXmlText($sb->getAsString());
if ($success == 0) {
    print $email->lastErrorText() . "\r\n";
    exit;
}