Comment effectuer une recherche dans des fichiers archivés avec Perl
-
02-07-2019 - |
Question
Quelle est votre méthode préférée pour lire le contenu des répertoires compressés avec Perl?
La solution
Il existe plusieurs modules sur CPAN permettant de travailler avec différents formats d’archives (zip, tar, etc.), celui que vous recherchez probablement est Archive :: Zip .
Autres conseils
Archive :: Zip
require Archive::Zip;
my $zip = Archive::Zip->new($somefile);
for($zip->memberNames()) {
print " Archive :: Zip
<*>\n";
}
Si vous voulez le contenu d'une archive .tar.gz
open(DIR_LISTING, "gzip -dc concert25.tgz | tar -tf -|") || die;
while (<DIR_LISTING>) {
print;
}
close (DIR_LISTING);
Licencié sous: CC-BY-SA avec attribution
Non affilié à StackOverflow