J'ai un fichier zip X et je voudrais extraire un seul fichier, situé dans x/x/x/file.txt. Comment faire cela en utilisant Archive::Zip et Perl?Comment puis-je extraire un seul fichier d'une archive ZIP en utilisant Perl's Archive :: Zip?
Vous pouvez utiliser la méthode extractMember:
extractMember (memberOrName $ [, extractedName $])
Extrait du membre donné, ou correspondant à son nom et l'extraire. Renvoie undef si le membre n'existe pas dans ce Zip. Si un second argument optionnel est donné, utilisez-le comme nom du membre extrait. Sinon, le nom de fichier interne du membre est utilisé comme nom du fichier ou du répertoire extrait. Si vous passez $ extraitName, il doit être dans le format du système de fichiers local. Tous les répertoires nécessaires seront créés. Renvoie AZ_OK en cas de succès.
Voir Archive::Zip::FAQ, "extraire le (s) fichier (s) d'un fichier ZIP". La version actuelle du fichier d'exemple est en ligne à http://cpansearch.perl.org/src/ADAMK/Archive-Zip-1.30/examples/extract.pl.