Walk a directory/Recursively: Difference between revisions

m (→‎{{header|Scala}}: Make critical note clearer)
Line 671:
=={{header|Clojure}}==
The standard function ''file-seq'' does a tree walk.
<lang clojure>(importuse '[clojure.java.io File])
 
(defn walk [dirpath pattern]
(doall (filter #(re-matches pattern (.getName %))
(doseq [file (-> dirpath File. file-seq)]
(if (re-matches pattern (.getNamefile-seq (file dirpath)))))
(println (.getPath file)))))
 
(map #(println (.getPath %)) (walk "src" #".*\.clj")</lang>)
</lang>
 
=={{header|D}}==
Anonymous user