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

Chilkat2 Perl

use strict;
use warnings;
use Chilkat2;

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

my $email = Chilkat2::Email->new;
$email->Subject('HasPlainTextBody example');

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

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