Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
use strict;
...
}

close(ZIP);
  2. or download this
    error: file not seekable 
 at /usr/lib/perl5/site_perl/5.8.8/Archive/Zip/Archive.pm line 437
        Archive::Zip::Archive::readFromFileHandle('Archive::Zip::Archi
+ve=HASH(0x88d4c54)', 'GLOB(0x83d9c28)') called at ./test.pl line 16
$status = 2
  3. or download this
    #!/usr/bin/perl
use strict;
...
}

close(ZIP);