Perl

Check Whether an Email Has a Plain-Text Body

Demonstrates the Chilkat Email.HasPlainTextBody method, which returns true only when a text/plain body is present in the current email object. This example sets a plain-text body and confirms its presence.

Background: The plain-text body is the fallback representation used when HTML is unavailable or unwanted — and the form usually preferred for search, indexing, and accessibility. HasPlainTextBody is the counterpart to HasHtmlBody; testing both lets a program handle every combination (text-only, HTML-only, both, or neither) gracefully.

Chilkat Perl Downloads

Download Chilkat for Perl

Perl

use chilkat();

#  Demonstrates the HasPlainTextBody method, which returns true only when a text/plain body
#  is present in the current email object.

$email = chilkat::CkEmail->new();
$email->put_Subject("HasPlainTextBody example");

$email->SetTextBody("Hello, this is the plain-text body.","text/plain");

if ($email->HasPlainTextBody() == 1) {
    print "The email has a plain-text body." . "\r\n";
}
else {
    print "The email does not have a plain-text body." . "\r\n";
}