How to search archive files using Perl

Question

What is your preferred method for reading the contents of zipped directories using Perl?

Answer 1

There are several modules in CPAN for working with various archive formats (zip, tar, etc.), the one that you probably after that is Archive ::. Zip

Answer 2

Archive :: Index

require Archive::Zip;
my $zip = Archive::Zip->new($somefile);
for($zip->memberNames()) {
  print "$_\n";
}

Answer 3

If you want the contents of the .tar.gz archive

open(DIR_LISTING, "gzip -dc concert25.tgz | tar -tf -|") || die;
while (<DIR_LISTING>) {
   print;
}
close (DIR_LISTING);