      :ping ping
      :platform platform}))
 
-(defn parse-line
-  "parse each line of a large file"
-  [line]
-  (str/split line #" = "))
-
 (def state (atom {}))
 
 (defn line-to-map

  [item]
  (get item :ip))

(defn read-detail
  "read in a large detail file"
  [file-name]
  (with-open [rdr (io/reader file-name)]
    (let [split-lines (doall (map parse-line (line-seq rdr)))]
      ;; (println split-lines))))
      (map line-to-map split-lines))))

(defn read-csv
  "read in a csv file"

(defn compare-ip
  "compare the ip held in log to the ips on compliance list"
  [wireless-ip]
  ;; (if 
  )

(defn get-ip
