Perl

Untar a .tar Archive

See more Tar Archive Examples

Untar a .tar archive. 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.

# Untar a .tar archive.
my $tar = Chilkat2::Tar->new;

# Untar into c:/temp/untarDir.  The directory tree(s) contained
# within the TAR archive will be re-created rooted at this
# directory.
$tar->UntarFromDir('/Users/chilkat/temp/untarDir');

# If any filepaths within the Tar archive are absolute,
# automatically make them relative by removing the first
# forward or backward slash.  This protects from untarring
# files to unexpected locations.
$tar->NoAbsolutePaths(1);

my $fileCount = $tar->Untar('/Users/chilkat/testData/tar/abc123.tar');
if ($fileCount < 0) {
    print $tar->LastErrorText, "\n";
} else {
    print 'Untarred ', $fileCount, " files and directories\n";
}