使用zip-conduit列出zip归档文件

3
使用zip-conduit库,我想列出ZIP档案中的条目。我只想每行打印它们的文件名 - 类似于unzip -l,但不包含任何其他信息。 注意:此问题是使用问答样式回答的,因此故意不显示任何研究工作!
1个回答

2
您可以使用entryNames函数。通过修改ZIP提取示例,我们可以打印名称而不是提取文件。
以下示例程序从第一个命令行参数中获取ZIP文件名,并使用mapM_ putStrLn打印它们:
import Codec.Archive.Zip (withArchive, entryNames)
import System.Environment (getArgs)

main = do
    -- ZIP file name: First commandline arg
    zipPath:_ <- getArgs
    names <- withArchive zipPath $ entryNames
    mapM_ putStrLn names

网页内容由stack overflow 提供, 点击上面的
可以查看英文原文,
原文链接