files.clj

(ns my-file-utils
  (:import java.io.File))

(def files (list))
(defn list-files [d]
  (doseq [f (.listFiles d)]
    (if (.isDirectory f)
      (conj files (.getName f)))))

(list-files (File. "/home/mcrittenden/Downloads"))
(printf (first files))