相关疑难解决方法(0)

现在正在通过真实世界Haskell工作.这是本书早期练习的解决方案:

-- | 4) Counts the number of characters in a file
numCharactersInFile :: FilePath -> IO Int
numCharactersInFile fileName = do
    contents <- readFile fileName
    return (length contents)

我的问题是:你如何测试这个功能？有没有办法制作"模拟"输入而不是实际需要与文件系统进行交互来测试它？Haskell强调纯函数,我必须想象这很容易做到.