在ocaml中运行可执行文件（windows）文件

Question

快速提问。如何在ocaml中运行可执行文件？我相信这是可能的，但我不知道如何。

请提供示例代码。

Answer 1

如果您只想运行程序而不与其通信，请使用Sys.command。

let exit_code = Sys.command "c:\\path\\to\\executable.exe /argument" in
(* if exit_code=0, the command succeeded. Otherwise it failed. *)

对于更复杂的情况，您需要使用functions in the Unix module。尽管名称，most of them在Windows下工作。例如，如果需要从命令获取输出：

let ch = Unix.open_process_in "c:\\path\\to\\executable.exe /argument" in
try
  while true do
    let line = input_line ch in …
  done
with End_of_file ->
  let status = close_process_in ch in …