Bug #42170 for Archive-Zip: Bug: Archive::Zip extract is not reporting a CRC error

Dear Archive::Zip developer, Huge files with CRC errors are not being reported. Perl code: foreach my $m ($zip->memberNames) { ## ## as long as it ends in csv if ($m =~ /\.csv$/i) { # case insensitive print "$m"; $AZ_level = $zip->extractMember($m, "./$m"); print " AZ errorlevel: $AZ_level\n"; $filename = $m; last; } } ================================================ A zip was extracted with Archive::Zip. Perl outputted code (only the first line below, using code above) BTTITLE01052009.CSV AZ errorlevel: 0 -rw-r--r-- 1 pubstock pubstock 1351048136 Jan 5 06:05 BTTITLE01052009.CSV sjohnson@web1:/home/pubstock/tmp$ md5sum BTTITLE01052009.CSV b8f5c20cf27b77315c168890dff84747 BTTITLE01052009.CSV ================================================ ================================================ This file was extracted with "unzip" in Linux Archive: /home/pubstock/interm/BAK-1231161290-0.tmp testing: BTTITLE01052009.CSV bad CRC eeaece2e (should be 0604b2be) At least one error was detected in /home/pubstock/interm/BAK-1231161290-0.tmp. sjohnson@web1:/tmp/sjohnson/huge$ md5sum BTTITLE01052009.CSV b8f5c20cf27b77315c168890dff84747 BTTITLE01052009.CSV sjohnson@web1:/tmp/sjohnson/huge$ crc BTTITLE01052009.CSV EEAECE2E BTTITLE01052009.CSV ================================================ Note: MD5SUMs both match (good). unzip claims a CRC error, Archive::Zip does not. Conclusion: Archive::Zip has a bug with CRC checking with huge files? (.zip is 300 megs, extracted file, ~1.3 gigs) Any thoughts? Thank you. -- smu johnson <smujohnson@gmail.com>