Create .taz, .tar.Z TAR Archive

Demonstrates how to create a compressed TAR archive containing an entire directory tree. This example creates a compressed archive using Unix "Z" compression. The typical file extensions used are .tar.Z and .taz.

 Chilkat Perl Module Downloads for Windows, Linux, and MAC OS X

use chilkat();

#  Important: It is helpful to send the contents of the
#  tar.LastErrorText property when requesting support.

$tar = new chilkat::CkTar();

#  Any string automatically begins a fully-functional 30-day trial.
$success = $tar->UnlockComponent("Anything for 30-day trial");
if ($success != 1) {
    print $tar->lastErrorText() . "\r\n";
    exit;
}

#  The TAR component will produce a  GNU tar 1.13.x format
#  archive by default.
#  It is also possible to create PAX -- POSIX 1003.1-2001 format
#  or USTAR -- POSIX 1003.1-1988 format.
#  Set the WriteFormat property to "gnu", "pax", or "ustar" to
#  choose the output TAR format:
$tar->put_WriteFormat("gnu");

#  Add a directory tree to be included in the output TAR archive:
$success = $tar->AddDirRoot("/Users/chilkat/temp/abc123");
if ($success != 1) {
    print $tar->lastErrorText() . "\r\n";
    exit;
}

#  First write a .tar, then compress to a .Z using UnixCompress.
$success = $tar->WriteTar("/Users/chilkat/testData/tar/abc123.tar");
if ($success != 1) {
    print $tar->lastErrorText() . "\r\n";
    exit;
}

$uc = new chilkat::CkUnixCompress();

$success = $uc->CompressFile("/Users/chilkat/testData/tar/abc123.tar","/Users/chilkat/testData/tar/abc123.tar.Z");
if ($success != 1) {
    print $uc->lastErrorText() . "\r\n";
}
else {
    print "Success." . "\r\n";
}