Perl

Set the X-Priority Header of an Email

Demonstrates how to set the X-Priority header field of an email. Perl

use chilkat();

# The AddHeaderField can be called to add any header field.
# If the header field already exists, AddHeaderField replaces it.
$email = chilkat::CkEmail->new();
$email->AddHeaderField("X-Priority","3 (Normal)");

$email->AddHeaderField("X-Priority","1 (High)");

$email->AddHeaderField("X-Priority","5 (Low)");

# The X-Priority value ranges from 1 to 5, with 1 being 
# high priority, 3 is normal, and 5 is low.
# You may set X-Priority to the number alone:

$email->AddHeaderField("X-Priority","1");

# Including extra text, such as (High), should not 
# affect how the header is interpreted.
$email->AddHeaderField("X-Priority","1 (High)");