如何从 Haskell 中的分叉进程读取数据？

Question

谁可以给我一个简短的例子，我调用一些系统命令，然后用 haskell 读出它，例如打印它？

我知道我可以使用 System.Cmd 来创建系统命令，例如： nm、ls、mkdir 等，

但我不需要仅调用它们，我还需要读取它并使用读取的字符串进行一些操作

Answer 1

要使用的关键库是 process 包，它提供System.Process。

调用命令并获取其输出：

readProcess
      :: FilePath   -- command to run
      -> [String]   -- any arguments
      -> String         -- standard input
      -> IO String  -- stdout

像这样：

import System.Process

main = do
    s <- readProcess "/bin/date" [] []
    putStrLn $ "The date is " ++ s

运行如下：

The date is Fri Apr 29 09:29:29 PDT 2011

Answer 2

System.Process 具有您想要的功能，特别是 readProcess。

main = do
  wcOut <- readProcess "wc" ["/usr/share/dict"] []
  let numLines = read (head (words wcOut)) :: Int
  if numLines > 10 then return () else print "That's a small dictionary."