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. Chilkat2 Perl

use strict;
use warnings;
use Chilkat2;

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

my $mime = Chilkat2::Mime->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(), "\n";