scrapes the download links for qcon2014 slides

scrape.clj

(ns qcon2014.core
 (require  [net.cgrand.enlive-html :refer [html-resource select]]))

(defn get-slide-links []
 (->> ["wednesday" "thursday" "friday"]
      (map    #(str "http://qconlondon.com/london-2014/schedule/" % ".jsp"))
      (map    #(html-resource (java.net.URL. %)))
      (mapcat #(select % [:a]))
      (filter #(= (:content %) '("Download slides")))
      (map    #(get-in % [:attrs :href]))
      (map    #(str "http://qconlondon.com" %))))
 
(for [link (get-slide-links)]
 (println link))