使用 shexp 运行外部命令并处理标准输出
任务
操作系统 / 运行外部命令并处理标准输出
使用的 Opam 包
- shexp 测试版本:v0.16.0 — 使用的库:shexp,shexp.process
代码
模块 Shexp_process.Infix 包含 |-
(管道)运算符。
open Shexp_process.Infix
我们使用管道运算符构建一个序列,该序列包含单个命令 ps -x
,然后使用 read_all
获取其标准输出。
let () =
let ps_output =
let open Shexp_process in
eval (run "ps" ["-x"] |- read_all)
in
print_endline ps_output