url shorten tool writen in Clojure