install-datomic.clj

(require '[me.raynes.fs :as fs])
(require '[me.raynes.fs.compression :refer [unzip]]

(defn download-datomic [version username password] 
 (let [credential (str username ":" password)]
  (when-not (fs/file? "datomic.zip")
   (fs/exec "cmd" "/C" (str "curl -L -u " credential " " download-url " > datomic.zip"))))
 (unzip "datomic.zip" ".")
 (fs/delete (fs/file "datomic.zip"))
 (fs/exec "cmd" "/C" (str "move datomic-pro-* datomic")))