Clojure - 文件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"]

写入文件

如果要写入文件，可以使用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)

执行上述代码后，"hello world"行将出现在Example.txt文件中。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”

打印页面