Help for this page
#!/usr/bin/perl -w use strict; ... die "inflation failed\n" unless $status == Z_STREAM_END ;
#!/usr/bin/perl -w use strict; ... print DATAFILE <$fh>; $fh->close; }