tar.gzファイルの展開

　Archive::Tarモジュールを使います。
　tarファイルの展開と同じようにextract()で展開できます。

use strict;
use warnings;
use Archive::Tar;

my $filename = "file.tar.gz";
my $tar = Archive::Tar->new;
$tar->read($filename) or die "$!:$filename";
my @files = $tar->extract();
foreach my $file (@files) {
    print $file->{name}, "\n";
}

tar.gzファイルの展開

関連項目