comp.clj

((comp
    #(reduce (fn [sum i] (+ sum i)) 0 %)
    (fn [s] (filter #(= 1 (mod % 2)) s))
    (fn [s] (map #(count (.split % " ")) s))
    (fn [s] (remove #(re-find #"^#" %) s))
    #(.split % "\n"))
  text)