gistfile1.clj

(ns people)

(defrecord Person [name age])

(def persons [(Person. "Boris" 40)
              (Person. "Betty" 32)
              (Person. "Bambi" 17)])

(def minor? #(-> % :age (<= 18)))

(defn main []
  (doseq [ff [filter remove]]
    (->> persons (ff minor?) (map :name) (interpose ", ") (apply str) println)))

;; see also: 
;; http://michid.wordpress.com/2010/08/24/so-scala-is-too-complex/