Perl

Get a To Recipient's Address Only

Demonstrates the Chilkat Email.GetToAddr method, which returns only the address part (not the friendly-name part) of the Nth To recipient. The index is zero-based. This example adds two To recipients and prints each one's address.

Background: When you need the machine-usable part of a recipient — the actual user@domain — GetToAddr returns it without the surrounding display name. This is what you want for validating addresses, removing duplicates, or checking against an allow/deny list, since the display name is free-form text and unreliable for identity.

Chilkat Perl Downloads

Download Chilkat for Perl

Perl

use chilkat();

#  Demonstrates the GetToAddr method, which returns only the address part (not the friendly
#  name) of the Nth To recipient.  The index is zero-based.

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

$email->AddTo("Joe Smith",'joe@example.com');
$email->AddTo("Jane Doe",'jane@example.com');

$n = $email->get_NumTo();

for ($i = 0; $i <= $n - 1; $i++) {
    print "To " . $i . " address: " . $email->getToAddr($i) . "\r\n";
}