Perl

Add Content-Length Header to a MIME Message

See more MIME Examples

The AddContentLength method automatically computes the length of the MIME content and adds a Content-Length header with the correct number of bytes. Perl

use chilkat();

# This example assumes the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.

$mime = chilkat::CkMime->new();

# Set the MIME body:
$mime->SetBody("This is a test");

# The complete size (in bytes) of the contents is computed, 
# even if the MIME is multipart, and the Content-Length header
# is added.
$mime->AddContentLength();

# Display the MIME:
print $mime->getMime() . "\r\n";