Example of how to read from STDIN in a Clojure program

stdin.clj

(ns example.stdin)

(defn -main
  "Read from STDIN"
  [& args]
  (println "Enter text:")

  (loop [input (read-line)]
    (when-not (= ":done" input)
      (println (str "You entered: >>" input "<<"))
      (recur (read-line))))

  (println "End"))