(Perl) 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 Downloads Perl Module for Windows, MacOS, Linux, Alpine Linux

use chilkat();

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

$tar = chilkat::CkTar->new();

# 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 = chilkat::CkUnixCompress->new();

$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";
}