let cc ?(strict=false) text : int = let it = Some(if strict then (String.big (^)) else (String.Text.to_string)) in make ~it ~ot:(String.chop || int_of_string) "wc -c" ~input:(Some text) ()