$collected .= $data;
            gunzip \$collected, \$out;
            print $out, $/;