I am not sure of any library that can read corrupted files, but it might be possible to turn an incomplete file into a complete one, adding a phony footer and removing the last file.

Look at the ZIP file format:
http://www.pkware.com/business_and_developers/developer/appnote/
The files in the zip are not connected to each other, so it is possible to read through the file, parsing each file as it comes and bailing out if the file ends unexpectedly:

#!/usr/bin/perl

open( Z, "test.zip" );

sub error {
    print "The file is corrupt.\n";
    exit;
}

sub readstr {
    my $received;
    error() if eof Z;
    $received .= getc(Z) . " " for ( 1 .. $_[0] );
    return $received;
}

sub readint {
    my $received = 0;
    error() if eof Z;
    $received = $received * 255 + ord( getc(Z) ) for ( 1 .. $_[0] );
    return $received;
}

while ( !eof Z ) {
    my $head     = readstr(4);    # PK^C^D
    my $versions = readstr(4);
    # ...
    my $filenamelength = readint(2);
    # ...
    # Parse the rest of this file
    # Until we get an error or go on to the next file header
}

close(Z);
[download]

My code doesn't actually produce a correct footer for the file, but it should start you off.

---

---

• Are you posting in the right place? Check out Where do I post X? to know for sure.
• Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:

  <code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>

• Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
• Want more info? How to link or How to display code and escape characters are good places to start.