Perl

bz2 Compress File

Compress a file to the bz2 file format. Perl

use chilkat();

$success = 0;

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

$bz2 = chilkat::CkBz2->new();

# Compress the file qa_data/hamlet.xml to create qa_output/hamlet.bz2
$success = $bz2->CompressFile("qa_data/hamlet.xml","qa_output/hamlet.bz2");
if ($success != 1) {
    print $bz2->lastErrorText() . "\r\n";
    exit;
}

print "Success." . "\r\n";