maps.clj

(defn maps [sep contents]
  (let [lines (lines sep contents)
        cols (first lines)
        rows (rest lines)]
    (map (partial zipmap cols) rows)))