HOME


Mini Shell 1.0
DIR:/usr/share/doc/perl-IO-Compress-2.061/io/bzip2/
Upload File :
Current File : //usr/share/doc/perl-IO-Compress-2.061/io/bzip2/bzstream
#!/usr/bin/perl

use strict ;
use warnings ;
use IO::Compress::Bzip2 qw(:all);

bzip2 '-' => '-'
  or die "bzstream: $Bzip2Error\n" ;