let make_new_directory ?perm dirname =
    mkdir_or_fail ?perm dirname