added my first useful clojure script