OCaml By Examples

commands

utop

...
utop # let run cmd =
  let inp = Unix.open_process_in cmd in
  let r = In_channel.input_all inp in
  In_channel.close inp ; r;;
val run : string -> string = <fun>

utop # run "echo 'hello'";;
- : string = "hello\n"
next: files