Quick edn-to-json, with basic handling of date and uuid types

edn-to-json.clj

#!/usr/bin/env boot
;; needs boot-clj

;; converts edn to json,
;;  - taking #inst to strings of ISO8601 timestamps
;;  - taking #uuid to strings

(set-env! :dependencies '[[org.clojure/data.json "0.2.6"]])

(require '[clojure.data.json :as json])
(require '[clojure.edn :as edn])

(defn run [in out]
  (let [inst->iso-string (fn [moment]
                           (let [s (pr-str moment)]
                             (subs s 7 (- (.length s) 1))))
        value-fn (fn [k v]
                   (condp instance? v
                     java.util.Date (inst->iso-string v)
                     java.util.UUID (str v)
                     v))
        data (edn/read in)]
    (json/write data out :value-fn value-fn)))

(defn -main [& args]
  (run *in* *out*))