Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

Re^2: Archive::Zip Problem: Zip versus Jar file formats

by Anonymous Monk
on Aug 15, 2007 at 16:06 UTC ( #632780=note: print w/ replies, xml ) Need Help??


in reply to Re: Archive::Zip Problem: Zip versus Jar file formats
in thread Archive::Zip Problem: Zip versus Jar file formats

Thanks Jimbo and Joost. I wanted a second opinion before I opened an issue and these insights will help me more effectively communicate the issue to the author. Cheers


Comment on Re^2: Archive::Zip Problem: Zip versus Jar file formats
Re^3: Archive::Zip Problem: Zip versus Jar file formats
by sblanton (Sexton) on Aug 22, 2007 at 20:17 UTC
    Yeah, I was able to reproduce this purely with the zip
    program, so I know it is not a subtle oddity of format for JAR's.
      OK, I just deleted the 'META-INF/' memeber before writing it back out and it works fine...the contents of META-INF/ are separate entries themselves so I don't lose anything...

      So, the issue is with the lone directory member and both zip and jar complain. It looks like a problem with Archive::Zip to me. I'm happy because I love this module and I can use it without waiting for a fix!!! Here is the code to create good and bad:

      #!/usr/bin/perl -w use Archive::Zip qw( :ERROR_CODES :CONSTANTS ); use strict; my $az_foo = Archive::Zip->new('foo.jar'); die 'write error' unless $az_foo->overwriteAs('bar_bad.jar') == AZ_OK; my ( $meta_inf_member) = $az_foo->removeMember('META-INF/'); die unless $meta_inf_member; die 'write error' unless $az_foo->overwriteAs('bar_good.jar') == AZ_OK +;

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://632780]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (6)
As of 2014-10-25 09:46 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    For retirement, I am banking on:










    Results (142 votes), past polls