有没有办法部分应用getLine？

Question

有没有办法将getLine 部分应用于writeFile 或类似功能（用于文件命名）？我想做这样的事情：

main = writeFile ??? . computeSomething =<< somethingElse

??? 应该是用户输入的用于命名输出文件的行，但我不知道为??? 插入什么。我尝试插入 =<< getLine 和类似的 sn-ps，但对我没有任何作用。

是否有可能在不以可读方式使用 do-notation 的情况下实现这一点？

Answer 1

您可以使用flip 来翻转参数的顺序：

getLine >>= flip writeFile computeSomething

如果您想对函数进行 eta-reduce，工具 pointfree 会很有帮助。