如何使用共享相同名稱的多個文件創建zip文件

Question

任何人都可以幫助我從兩個相同名稱的文件中創建zip文件。這是用於測試目的之一。如果你有任何與a.txt和a.txt相同的文件作爲內容的zip文件，請讓我知道。任何幫助，高度讚賞。

Answer 1

這實際上很容易使用Archive::Zip。試圖用標準的解壓縮工具來提取它，當

my $zip = Archive::Zip->new; 
$zip->addString("test one", "a.txt"); 
$zip->addString("test two", "a.txt"); 
$zip->writeToFileNamed("test.zip"); 

沒有什麼很有意思的情況：

$ unzip test.zip 
Archive: test.zip 
extracting: a.txt 
replace a.txt? [y]es, [n]o, [A]ll, [N]one, [r]ename: y 
extracting: a.txt 

如果你稍微喜歡更有趣的內容就可以了，當然，使用addFile方法，而不是addString。