let rec temp_dir ?(perm=0o755) ?(parent="/tmp") ?(prefix="") ?(suffix="") () = Templib.temp_name ~dir:true ~parent ~perm ~prefix ~suffix ()