clojure命名空间的使用

在实际项目中通常不能把函数都写在一个命名空间里面，比如我把一个生成md5的方法提取出来

tools.clj

(ns spider.tools)
(import [java.security MessageDigest])
(import [sun.misc BASE64Encoder])
(defn str-md5 [str]
  (let [md5 (MessageDigest/getInstance "md5")
        base64en (BASE64Encoder.)
        newstr (->>
                 (.getBytes str "UTF-8")
                 (.digest md5)
                 (.encode base64en))]
    (println newstr))
  )

core.clj

(ns spider.core
  (:require [spider.task :as task])
  (:require [spider.tools :as tools])
  (:gen-class))



(defn -main
  "I don't do a whole lot ... yet."
  [& args]
  (tools/str-md5 "test")
  )