Skip to content

Instantly share code, notes, and snippets.

@dbushenko

dbushenko/gist:1235970

Created September 22, 2011 20:37
Show Gist options
  • Save dbushenko/1235970 to your computer and use it in GitHub Desktop.
Save dbushenko/1235970 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.txt
(ns webtest.core
(:require [pl.danieljanus.tagsoup :as ts]
[hiccup.core :as h]
[clojure.contrib.duck-streams :as io]))
(def data (slurp "data/data.html"))
(def parsed (ts/parse-string data))
(def generated (h/html parsed))
(io/spit "data/output.html" generated)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment