Ho un file zip X e vorrei estrarre un singolo file, che si trova in x/x/x/file.txt. Come faccio a farlo usando Archive::Zip e Perl?Come posso estrarre un singolo file da un archivio ZIP usando Perl's Archive :: Zip?
È possibile utilizzare il metodo extractMember:
extractMember ($ memberOrName [, $ extractedName])
Estrarre il membro data, o della partita il suo nome ed estrarlo. Restituisce undef se il membro non esiste in questo Zip. Se viene fornito un secondo argomento opzionale, utilizzarlo come nome del membro estratto. In caso contrario, il nome file interno del membro viene utilizzato come nome del file o della directory estratti. Se passi $ extractedName, dovrebbe essere nel formato del file system locale. Verranno create tutte le directory necessarie. Restituisce AZ_OK in caso di successo.
Vedere Archive::Zip::FAQ, "estrai file da uno zip". La versione corrente del file di esempio è online allo http://cpansearch.perl.org/src/ADAMK/Archive-Zip-1.30/examples/extract.pl.