Create a gist now

Instantly share code, notes, and snippets.

What would you like to do?
user> (filter #(re-find #"^[^aeiou]*a[^aeiou]*e[^aeiou]*i[^aeiou]*o[^aeiou]*u[^aeiou]*$" %) (clojure.contrib.io/read-lines "/usr/share/dict/words"))
("abstemious" "abstemiously" "abstentious" "acheilous" "acheirous" "acleistous" "affectious" "annelidous" "arsenious" "arterious" "bacterious" "caesious" "facetious" "facetiously" "fracedinous" "majestious")
Owner

purcell commented Sep 24, 2010

Or, indeed:

(filter #(re-find #"a[^aeiou]*e[^aeiou]*i[^aeiou]*o[^aeiou]*u" %)
        (clojure.contrib.io/read-lines "/usr/share/dict/words"))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment