Bug #76481 for IO-Compress: Give early notice on non-zip files

Tue Apr 10 16:35:08 2012 DOUGW [...] cpan.org - Ticket created

Subject:

Give early notice on non-zip files

I download zip files, but every once in a while, they're really just text files. It would be nice if it died on: my $z = IO::Uncompress::Unzip->new($zip_file) or die "Feiled to open $zip_file: $UnzipError"; Instead it dies at: my $filename = $z->getHeaderInfo()->{Name}; because getHeaderInfo returns undef. Also, if I eval and ignore that error, then: my $status = $z->nextStream() dies with "Can't call method "reset" on an undefined value at .../IO/Uncompress/Base.pm line 958.

Sat Apr 14 14:52:36 2012 pmqs [...] cpan.org - Correspondence added

On Tue Apr 10 16:35:08 2012, DOUGW wrote: Show quoted text

> > I download zip files, but every once in a while, they're really just > text files. It would be nice if it died on: > > my $z = IO::Uncompress::Unzip->new($zip_file) > or die "Feiled to open $zip_file: $UnzipError";

It will of you want to disable Transparent mode my $z = IO::Uncompress::Unzip->new($zip_file, Transparent => 0) or die "Failed to open $zip_file: $UnzipError"; Paul

Sat Apr 14 14:52:37 2012 The RT System itself - Status changed from 'new' to 'open'

Sun Apr 15 16:57:09 2012 DOUGW [...] cpan.org - Correspondence added

On Sat Apr 14 14:52:36 2012, PMQS wrote: Show quoted text

> On Tue Apr 10 16:35:08 2012, DOUGW wrote:

> > > > I download zip files, but every once in a while, they're really just > > text files. It would be nice if it died on: > > > > my $z = IO::Uncompress::Unzip->new($zip_file) > > or die "Feiled to open $zip_file: $UnzipError";

> > It will of you want to disable Transparent mode > > my $z = IO::Uncompress::Unzip->new($zip_file, > Transparent => 0) > or die "Failed to open $zip_file: $UnzipError";

Cool. Thanks. I read the docs, but apparently not carefully enough :-) -Doug

Sun Apr 15 16:57:27 2012 DOUGW [...] cpan.org - Status changed from 'open' to 'rejected'