remove_last_vowel.clj

(require 'clojure.string)

(defn remove-last-vowel [word]
  (-> word
      clojure.string/reverse
      (clojure.string/replace-first #"[aeiouy]" "")
      clojure.string/reverse))

(defn remove-last-vowels [sentence]
  (->> (clojure.string/split sentence #" ")
       (map remove-last-vowel)
       (clojure.string/join " ")))

(println (remove-last-vowels "Hi, there!"))
(println (remove-last-vowels "This is not a test."))
(println (remove-last-vowels "Hippopotamus"))