Come cercare tra i file archiviati con Perl

Question

Qual è il tuo metodo preferito per leggere i contenuti delle directory zippate con Perl?

Answer 1

Esistono diversi moduli su CPAN per lavorare con vari formati di archivio (zip, tar, ecc.), quello che probabilmente stai cercando è Archive :: Zip .

Answer 2

Archive :: Zip

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

<*>\n";
}

Answer 3

Se si desidera il contenuto di un archivio .tar.gz

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