Skip to content

Instantly share code, notes, and snippets.

@devstopfix
Created January 3, 2017 21:30
Show Gist options
  • Save devstopfix/59d77f6d49383b95e09f8b9e8197bcb8 to your computer and use it in GitHub Desktop.
Save devstopfix/59d77f6d49383b95e09f8b9e8197bcb8 to your computer and use it in GitHub Desktop.
Dinosaur names - Planck
(ns words
(:require [planck.core :refer [slurp]]
[clojure.string :refer [split-lines upper-case]]))
(def dinosaurs
(->> "/usr/share/dict/words"
(slurp)
(split-lines)
(map upper-case)
(filter #(re-find #"AURUS$" %))))
@devstopfix
Copy link
Author

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment