title case word clojure
(defn- title-case-word [w] (if (zero? (count w)) w (str (Character/toTitleCase (first w)) (subs w 1))))