a url shortening service using clojure