Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change
 
PerlMonks  

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

by sblanton (Sexton)
on Aug 22, 2007 at 20:17 UTC ( [id://634513]=note: print w/replies, xml ) Need Help??


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

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.
  • Comment on Re^3: Archive::Zip Problem: Zip versus Jar file formats

Replies are listed 'Best First'.
Re^4: Archive::Zip Problem: Zip versus Jar file formats
by sblanton (Sexton) on Aug 22, 2007 at 20:30 UTC
    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
Domain Nodelet?
Node Status?
node history
Node Type: note [id://634513]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others perusing the Monastery: (4)
As of 2024-04-19 02:56 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found