uncompress winzip file using perl

[Fisher, John]

I used winzip 12.0 to zip a file and used the code below to successfully unzip 
it.

=======
#!/usr/bin/perl -w
use IO::Uncompress::AnyInflate qw(anyinflate $AnyInflateError) ;
@ARGV == 2 or die "Usage: $0 <in_zipfile> <out_uncompressed_file>\n";
my $input=$ARGV[0];
my $output=$ARGV[1];

if ( -f $input ) {
} else {
  print "Input file is not a file or does not exist\n";
}
if ( -f $output ) {
  print "Output file already exists\n";
}

my $status = anyinflate $input => $output
        or die "anyinflate failed: $AnyInflateError\n";

print "File is done\n";
=========

It was a clear text zipped file.

The file I am trying to unzip was compressed with winzip but not sure the 
verizion number. However, it is a binary SAS file. When I ran the above code 
against that binary file I got this error:

anyinflate failed: Header Error: Encrypted content not supported

Do you think the binary is confusing the uncompress? Any way around that?

Thanks,
John