let wc text : int = make ~it:(Some String.Text.to_string) ~ot:(String.chop || int_of_string) "wc -w" ~input:(Some text) ()