Perl

Change the Filename of an Attachment

Demonstrates the Chilkat Email.SetAttachmentFilename method, which changes the filename of the attachment at a given zero-based index. This example adds an attachment and renames it, printing the filename before and after.

Background: The attachment filename is what a recipient sees and what most clients suggest when saving the file. Renaming it is handy when the original name is unclear, unsafe, or generic — for example giving a machine-generated tmp12345 a meaningful name like invoice.pdf before sending.

Chilkat Perl Downloads

Download Chilkat for Perl

Perl

use chilkat();

$success = 0;

#  Demonstrates the SetAttachmentFilename method, which changes the filename of the
#  attachment at the given zero-based index.

$email = chilkat::CkEmail->new();
$email->put_Subject("Set attachment filename");

$email->AddStringAttachment("oldname.txt","Some notes.");
print "Filename before: " . $email->getAttachmentFilename(0) . "\r\n";

#  Change the filename of the first attachment (index 0).
$success = $email->SetAttachmentFilename(0,"newname.txt");
if ($success == 0) {
    print $email->lastErrorText() . "\r\n";
    exit;
}

print "Filename after: " . $email->getAttachmentFilename(0) . "\r\n";