(def example-input `11-22,95-115,998-1012,1188511880-1188511890,222220-222224,1698522-1698528,446443-446449,38593856-38593862,565653-565659,824824821-824824827,2121212118-2121212124`)

(defn mapi "immutable map" [f xs] (slice (map f xs)))

(defn parse-input [input]
  (mapi |(mapi parse (string/split "-" $))
    (string/split "," input)))


(defn solve/1 [data]
    (map (fn [[l r]]
        (range l r))
      data))

(pp (solve/1 (parse-input example-input)))