let shf fmt = Printf.ksprintf sh fmt