用於Perl單元測試的模擬文件系統

Question

有沒有一種方法或模塊允許我模擬僞文件系統以用於Perl單元測試？

我在單元測試中使用了各種Test::*和Test::Mock*模塊，但偶爾我希望能夠僞造一個文件系統。一個簡單的例子（和最低要求）將僞造-r或-f文件測試運算符的結果，以便在我調用執行文件測試的對象或模塊時，我可以更容易地控制結果。

我知道有很多方法可以解決這個問題，比如在自己的函數中創建臨時文件或者包裝文件測試，然後可以被嘲笑，但是有時候如果我能夠獲得Perl對我說謊......所以被測試建議重寫代碼解決方案不要求;-)

更新：

有剛剛找到並閱讀this SO question，重寫代碼，使其更後可測試看起來像更明智的選擇。儘管如此，手指交叉...

Answer 1

這些值得一看：Filesys::Virtual和 Filesys::Virtual::Async。我用過第一個。與Path::Class和File::Temp混合在一起，很容易做到各種各樣自潔的東西簡潔優雅。 Test::Virtual::Filesystem也看起來很有趣。