Clojure - File I/O
在使用I/O时，Clojure提供了许多辅助方法。 它提供了更简单的类来为文件提供以下功能。
- 读文件
- 写入文件
- 查看文件是文件还是目录
让我们来探讨一下Clojure提供的一些文件操作。
将文件内容作为整个字符串读取
如果要将文件的全部内容作为字符串获取，可以使用clojure.core.slurp方法。 slurp命令在文件上打开一个读取器并读取其所有内容，返回一个字符串。
以下是如何做到这一点的一个例子。
(ns clojure.examples.hello
(:gen-class))
;; This program displays Hello World
(defn Example []
(def string1 (slurp "Example.txt"))
(println string1))
(Example)
如果文件包含以下行，则它们将打印为 -
line : Example1
line : Example2
一次读取一行文件的内容
如果要一次一行地将文件的全部内容作为字符串获取，可以使用clojure.java.io/reader方法。 clojure.java.io/reader类创建一个读取器缓冲区，用于读取文件的每一行。
以下示例说明了如何完成此操作。
(ns clojure.examples.hello
(:gen-class))
;; This program displays Hello World
(defn Example []
(with-open [rdr (clojure.java.io/reader "Example.txt")]
(reduce conj [] (line-seq rdr))))
(Example)
如果文件包含以下行，则它们将打印为 -
line : Example1
line : Example2
输出将显示为 -
["line : Example1" "line : Example2"]
写'到'文件
如果要编写'to'文件，可以使用clojure.core.spit命令将整个字符串写入文件。 spit命令与slurp方法相反。 此方法将文件作为编写器打开，写入内容，然后关闭文件。
以下是一个例子。
(ns clojure.examples.hello
(:gen-class))
;; This program displays Hello World
(defn Example []
(spit "Example.txt"
"This is a string"))
在上面的示例中，如果您看到Example.txt文件的内容，您将看到“This is a string”的内容。
一次写'到'文件一行
如果要一次一行地写'到'文件，可以使用clojure.java.io.writer类。 clojure.java.io.writer类用于创建写入流，其中数据字节被馈送到流中并随后进入文件。
以下示例显示了如何使用spit命令。
(ns clojure.examples.hello
(:gen-class))
;; This program displays Hello World
(defn Example []
(with-open [w (clojure.java.io/writer "Example.txt" :append true)]
(.write w (str "hello" "world"))))
(Example)
执行上面的代码时，Example.txt文件中将出现“hello world”行。 append:true选项是将数据附加到文件。 如果未指定此选项，则只要将数据写入文件，就会覆盖该文件。
检查是否存在文件
要检查文件是否存在，可以使用clojure.java.io.file类来检查文件是否存在。 以下是一个示例，说明如何实现这一目标。
(ns clojure.examples.hello
(:gen-class))
;; This program displays Hello World
(defn Example []
(println (.exists (clojure.java.io/file "Example.txt"))))
(Example)
如果文件Example.txt存在，则输出为true。
从控制台读取
要从控制台读取数据，可以使用read-line语句。 以下是一个示例，说明如何使用它。
如果在REPL窗口中输入（read-line）命令，您将有机会在控制台窗口中输入一些输入。
user->(read-line)
Hello World
上面的代码将产生以下输出。
“Hello World”
