Clojure 读取文件

Clojure 是一种基于 Java 平台的 Lisp 方言，它有丰富的函数式编程特性和易于操作 Java 类库的接口。本篇文章将介绍 Clojure 中如何读取文件的操作。

在 Clojure 中，我们可以使用 clojure.java.io 名称空间下的 file 函数来创建一个 Java File 对象。我们可以在 File 对象的基础上使用 clojure.java.io 名称空间下的其他函数来进行文件的读写操作。

读取文件

我们可以使用 with-open 函数来打开一个文件并读取其中的内容。下面是一个简单的例子，读取文本文件中的内容：

(require '[clojure.java.io :as io])

(with-open [rdr (io/reader "path/to/file.txt")]
  (doseq [line (line-seq rdr)]
    (println line)))

在上面的代码中，io/reader 函数返回一个 Java Reader 对象，它可以读取文本文件中的内容，例如 txt 文件。with-open 函数会自动关闭 Reader 对象以避免文件泄漏。

如果我们要读取二进制文件，例如图片、视频、压缩文件等，则可以使用 io/input-stream 函数。下面是一个读取二进制文件的例子：

(require '[clojure.java.io :as io])
(require '[clojure.java.io.protocols :as prot])

(with-open [is (io/input-stream "path/to/file.png")]
  (println (-> is
               io/byte-array
               (prot/byte-array-to-hex-string))))

在上面的代码中，io/input-stream 函数返回一个 Java InputStream 对象，它可以读取二进制文件中的内容。我们可以将 InputStream 对象转换成字节数组，然后将字节数组转换成十六进制字符串，以便于输出和查看文件内容。

写入文件

我们可以使用 io/writer 函数来创建一个 Java Writer 对象，它可以写入文本内容到文件中。下面是一个简单的例子，将字符串写入文本文件：

(require '[clojure.java.io :as io])

(with-open [wrtr (io/writer "path/to/file.txt")]
  (.write wrtr "Hello, Clojure!"))

在上面的代码中，io/writer 函数返回一个 Java Writer 对象，它可以将文本写入文件中。我们可以使用 .write 方法来将字符串写入文件中。

如果我们要写入二进制内容到文件中，例如图片、视频、压缩文件等，则可以使用 io/output-stream 函数。下面是一个写入二进制文件的例子：

(require '[clojure.java.io :as io])
(require '[clojure.java.io.protocols :as prot])

(with-open [os (io/output-stream "path/to/file.png")]
  (-> "Hello, Clojure!"
      (.getBytes)
      (prot/hex-string-to-raw-bytes)
      (.write os)))

在上面的代码中，io/output-stream 函数返回一个 Java OutputStream 对象，它可以将二进制内容写入文件中。我们可以将字符串转换成字节数组，然后将字节数组转换成二进制内容写入文件中。

结论

本篇文章介绍了 Clojure 中如何读取和写入文件的基本操作。通过使用 clojure.java.io 名称空间下的函数，我们可以方便地进行文件的操作，同时享受到 Clojure 的函数式编程特性。