如何在clojure中读取stdin(*in*)中的行

Question

我正在编写我的第一个clojure程序,并希望从stdin读取行.

当我尝试这个:

(doall (map #(println %) (line-seq *in*)))

我得到这个例外:

Exception in thread "main" java.lang.ClassCastException: clojure.lang.LineNumberingPushbackReader cannot be cast to java.io.BufferedReader (test.clj:0)

我在版本1.0和1.1中得到了相同的结果

那么如何转换*in*为seq我可以迭代？我会认为这很常见,*in*本身可以迭代,但这也不起作用 - 如果我尝试直接使用它,我得到:

java.lang.IllegalArgumentException: Don't know how to create ISeq from: clojure.lang.LineNumberingPushbackReader (NO_SOURCE_FILE:0)

另外,有没有在clojure中进行常规文件处理的例子？

Answer 1

尝试包裹*in*的java.io.BufferedReader.并且还使用devstopfix指出doseq代替doall:

(doseq [ln (line-seq (java.io.BufferedReader. *in*))]
   (println ln))

请注意,line-seq记录为要求其BufferedReader作为其来源.

Answer 2

您应该使用doseq而不是doall:

(doseq [line (line-seq (java.io.BufferedReader. *in*))] 
    (println line))

doall:

通过seq的连续nexts,保留头并返回它,从而导致整个seq一次驻留在内存中.

剂量:

不保留序列的头部.返回零.

Answer 3

请注意,对于任何想要只阅读一行的人来说,都有读取线功能.

Answer 4

对于相当小的输入，以下也适用：

(let [input-string (slurp *in*)]
  (println input-string))

或者，按行拆分：

(let [lines (clojure.string/split-lines (slurp *in*))]
  (println lines))