📜  Clojure-文件I / O

📅  最后修改于: 2020-11-05 04:00:27             🧑  作者: Mango


使用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文件的内容,则将看到“这是一个字符串”的内容。

一次写入“到”文件一行

如果要一次将“到”文件写入一行,则可以使用clojure.java.io.writer类。 clojure.java.io.writer类用于创建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窗口中输入(读取行)命令,则将有机会在控制台窗口中输入一些输入。

user->(read-line)
Hello World

上面的代码将产生以下输出。

“Hello World”