Clojure's `eval` and namespaces

bleval.clj

;; Clojure's eval is dynamic with respect to current namespace. 
;; If you ever find yourself in need of eval but want to avoid **wat** 
;; moments here's hopefully an illuminating sequence:
user> (in-ns 'bla)
#namespace[bla]
bla> (refer-clojure)
nil
bla> (def x "bla")
#'bla/x
bla> (defn bleval [s]
       (eval (read-string s)))
#'bla/bleval
bla> (in-ns 'dao)
#namespace[dao]
dao> (refer-clojure)
nil
dao> (def x "dao")
#'dao/x
dao> (bla/bleval "x")
"dao"
dao> (in-ns 'bla)
#namespace[bla]
bla> (defn bleval [s]
       (binding [*ns* (find-ns 'bla)]
         (eval (read-string s))))
#'bla/bleval
bla> (in-ns 'dao)
#namespace[dao]
dao> (bla/bleval "x")
"bla"