在Clojure中的目录中列出文件

Question

如何在Clojure中的特定目录中的所有文件中创建列表？我是否必须求助于Java或者Clojure可以原生地处理这个问题吗？

Answer 1

使用file-seq功能.

用法示例:

(def directory (clojure.java.io/file "/path/to/directory"))
(def files (file-seq directory))
(take 10 files)

Answer 2

Clojure旨在拥抱Java平台,这是Clojure不提供自己的API的一个领域.这意味着你可能不得不深入研究Java,但是你必须使用的类可以直接从Clojure中完全使用.

您应该在javadocs中阅读的一个类是java.io.File,它表示文件路径.

http://docs.oracle.com/javase/6/docs/api/java/io/File.html

的.listFiles实例方法返回的数组的(可以作为SEQ使用)File对象-一个用于在由所识别的目录中的每个条目File实例.还有其他有用的方法可用于确定是否File存在,是目录等.

例

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

(defn my-ls [d]
  (println "Files in " (.getName d))
  (doseq [f (.listFiles d)]
    (if (.isDirectory f)
      (print "d ")
      (print "- "))
    (println (.getName f))))

;; Usage: (my-ls (File. "."))

构造文件对象

File有时使用的构造函数有点不方便(特别是在一次合并多个路径段时),在这种情况下,Clojure提供了一个有用的辅助函数:clojure.java.io/file.作为其参数,它接受路径段作为字符串或文件.段与平台的正确路径分隔符连接.

http://clojuredocs.org/clojure_core/clojure.java.io/file

注意:Clojure还提供了file-seq通过从给定文件开始的文件层次结构返回预订步行(作为seq)的函数.

Answer 3

还可以看看fs库.

如果你只需要一个目录中的文件列表,那么可能不值得引入额外的依赖,但是那里有许多有用的实用函数,例如:

• 创建目录结构
• 复制,删除,移动
• 检查和更改权限
• 拆分和规范化路径
• 创建临时文件和目录
• 通配符
• 使用zip和tar文件

Answer 4

(use 'clojure.java.io)
(-> "/tmp" file .listFiles)

后一个表达式是从方法listFiles返回的File-objects数组,在从路径"/ tmp"创建的文件对象上调用.这是一种奇特的写作方式:

(.listFiles (file "/tmp"))

Answer 5

通常,当我们说要列出目录时,我们的意思是我们想要获取文件名或路径,所以 - >

列出目录的最简单方法:

(seq (.list (clojure.java.io/file ".")))

如果要以递归方式列出,则:

(map #(.getPath %)
     (file-seq (clojure.java.io/file ".")))

Answer 6

要使修改后的代码与原始示例代码的功能相匹配,您应该添加调用以获取文件名,如下所示.

(def directory (clojure.java.io/file "/path/to/directory"))
(def files 
    (for [file (file-seq directory)] (.getName file)))
(take 10 files)