.clj
(println "Hello world!")
(defn clean [s]
(clojure.string/trim (clojure.string/replace s #"\s+" " ")))
(defn numbers [s]
(map read-string (clojure.string/split s #" ")))
(defn -main []
(let [entrada (clean (slurp *in*))]
(println (apply + (numbers entrada)))))