$zlib = new Compress::Raw::Zlib::Inflate( -WindowBits => WANT_GZIP, -ConsumeInput => 1 );
#LATER
sub onData {
     my ($comp_in, $output, $status) = $_[0];
     $status = $zlib->inflateReset() if $zlib->status() == Z_STREAM_END;
     die "failed" if $status != Z_OK;
     $status = $zlib->inflate($comp_in, $output);
     die "failed" if $status != Z_OK && $status != Z_STREAM_END ;
     print $output;
}