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

Chilkat2 Perl

use strict;
use warnings;
use Chilkat2;

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

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

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

my $n = $email->NumTo;
for my $i (0 .. $n - 1) {
    print 'To ', $i, ' address: ', $email->GetToAddr($i), "\n";
}