RosettaCodeData/Task/Unix-ls/Clojure/unix-ls.clj

4 lines
132 B
Clojure

(def files (sort (filter #(= "." (.getParent %)) (file-seq (clojure.java.io/file ".")))))
(doseq [n files] (println (.getName n)))