Skip to content

Instantly share code, notes, and snippets.

@tomjack

tomjack/scratch.clj Secret

Created August 24, 2011 06:44
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save tomjack/d58de88cc6db11bd1122 to your computer and use it in GitHub Desktop.
Save tomjack/d58de88cc6db11bd1122 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
scratch.clj
(->> response
client/string
(mapcat (partial re-seq #".+\r\n"))
(map (comp f json/read-json))
doall)
(let [records (->> response
client/string
(mapcat (partial re-seq #".+\r\n"))
(map json/read-json))]
(doseq [record records]
(f record)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment