使用命令提示符读取clojure中的文件并显示内容

Question

我已经阅读了如下文件

(defn get-lines [file]
    (with-open [rdr (clojure.java.io/reader file)]
      (count (line-seq rdr))))

  (get-lines "D:/clojurefile/t2/ct.txt")

但它不显示内容 我想在提示符下打印我的文件中的数据！

Answer 1

(count (line-seq rdr))返回文件中的行数。您应该删除count以打印文件的全部内容：

(defn get-lines [file]
  (with-open [rdr (clojure.java.io/reader file)]
    (line-seq rdr)))

(println (get-lines "D:/clojurefile/t2/ct.txt"))

编辑：要从命令行（而不是在REPL中）打印文件的内容，您应该使用上面编辑的打印功能。此外，如果文件不是太大，使用slurp函数会更简单，该函数会立即读取内存中文件的内容，而不是with-open：

(println (slurp "D:/clojurefile/t2/ct.txt"))