You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

16 lines
312 B
Clojure

(require '[clojure.string :as str])
(->> (str/split-lines (slurp "./in"))
(map
(fn [line]
(as-> line $
(str/split $ #" ")
(subvec $ 11 15)
(filter #(.contains [2 3 4 7] (count %)) $)
(count $)
)))
(apply +)
(println)
)