polindrome.clj

(def input "xyzzy | yzzy
afbbbfjdjklgdfdhfdkjfffhhfffjkdfhdhkyejejfjkd | dhfdkjfffhhfffjkdfhd
bartarcarracecarbartar | racecar
3.1415926535897932384626433832795028841971 | 46264")

(defn polindrome? [x]
  (= (reverse s) (seq s)))

(defn splt [s]
  (clojure.string/split s #"\n| | "))

(->> input
     (splt)
     (filter polindrome?)
     (sort-by count)
     (last))