Re: Unusual IO::Uncompress::Gunzip behavior

[pmqs]

in reply to Unusual IO::Uncompress::Gunzip behavior

You need to use the MultiStream option if you want to deal with concatenated gzip files.

use strict;
use warnings;

use IO::Compress::Gzip qw(gzip $GzipError) ;
use IO::Uncompress::Gunzip qw(gunzip $GunzipError) ;

my $gzipped;
for my $txt ( qw(Alpha Beta Gamma)) {
    gzip \$txt => \$gzipped, Append => 1 
        or die "gzip failed: $GzipError\n";
}

my $out;
gunzip \$gzipped => \$out, 
        MultiStream => 1 
    or die "gunzip failed: $GunzipError\n";

print "Uncompressed is:\n$out\n";

[cmv]

pmqs++

Many thanks for pointing this out!

Danged if I can figure out how I missed that after going through the docs so many times.

Maybe it's time for reading glasses...

-Craig

Update: This test program will hang on *nix machines that have IO::Compress 2.015. I've found that you need at least 2.020, and have upgraded my systems to 2.055