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) ()