Skip to content

Instantly share code, notes, and snippets.

@purcell
Created September 24, 2010 16:01
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save purcell/595603 to your computer and use it in GitHub Desktop.
Save purcell/595603 to your computer and use it in GitHub Desktop.
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")
@purcell
Copy link
Author

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