Select Code to Download

use Archive::Extract;
$Archive::Extract::PREFER_BIN = 1;
my $ae = Archive::Extract->new( archive => 'big.txt.gz' );
$ae->extract( to => 'big.txt');

sub _gunzip_bin {
    my $self = shift;
...

    return 1;
}