Thnaks,
Your code semms to save members into DISK.
I found the next:
use Compress::Zlib;
my @files = $tar->list_files;
for my $file (@files) {
my $filedata = $tar->get_content($file);
my $dest = Compress::Zlib::memGunzip($filedata);
}
Regards,
H.T.
Hello,
2009/9/10 田口 浩
> Hello,
>
> Anyone knows the way to read ".gz" members in .tar file?
> I can read plain text files by the next code.
> But when the member is ".gz", I get uneadbale binay data.
>
> use Archive::Tar;
> my $file = shift;
> my $tar = Archive::Tar->new($file, 1) or die "Error Archive: