gistfile1.txt

(defn encode-url-param [v]
  (-> v
      (str/replace " " "_0")
      (str/replace "-" "_1")
      (str/replace "&" "_2")
      (str/replace "'" "_3")
      (str/replace "," "_4")
      (clojure.string/escape
        {\[ "_5"
         \] "_6"
         \( "_7"
         \) "_8"})))

(defn decode-url-param [v]
  (-> v
      (str/replace "_0" " ")
      (str/replace "_1" "-")
      (str/replace "_2" "&")
      (str/replace "_3" "'")
      (str/replace "_4" ",")
      (str/replace "_5" "[")
      (str/replace "_6" "]")
      (str/replace "_7" "(")
      (str/replace "_8" ")")))