perl - 您如何以编程方式比较两个存档文件的内容？

Question

我正在做一些测试，以确保我使用脚本文件创建的一体式 zip 文件将产生与我必须手动单击并通过 Web 界面创建的一些 zip 文件的内容相同的输出。因此，zip 将具有不同的文件夹结构。

当然，我可以手动提取它们并使用我强大的眼球技术来扫描它们，甚至更懒惰我可以编写一个脚本来做到这一点，但是在我投入更多时间并因公司时间抢劫而被老板指控之前，我问如果有更好的方法来做到这一点？

顺便说一下，我正在使用 perl LAMP 堆栈。
谢谢。

Answer 1

你可以使用 perl 的 Archive::ZIP或 Python 的 zipfile提取存档中文件的文件名、大小和 CRC 校验和。创建一个文件，其中包含按文件名排序的结果(忽略路径)。

对于较小的 ZIP，请合并脚本的结果 ( cat list1 list2 list3 | sort )。

现在，您可以使用 diff来比较结果。