Perl
Chilkat2 Perl
Create Compressed .tgz (.tar.gz) TAR Archive
See more Tar Archive Examples
Demonstrates how to create a compressed TAR archive containing an entire directory tree. This example creates a compressed archive using GZip compression. The typical file extension used is .tgz or .tar.gz.Chilkat Perl Downloads
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 $tar = Chilkat2::Tar->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->WriteFormat('gnu');
# Add a directory tree to be included in the output TAR archive:
my $success = $tar->AddDirRoot('/Users/chilkat/temp/abc123');
if (!$success) {
print $tar->LastErrorText, "\n";
exit;
}
# Create the compressed TAR archive.
# Note: You may use UNC paths, absolute, or relative paths.
$success = $tar->WriteTarGz('/Users/chilkat/testData/tar/abc123.tgz');
if (!$success) {
print $tar->LastErrorText, "\n";
exit;
}
print "Success.\n";