 (ns trend-compliance.core
   (:require [clojure.data.csv :as csv]
             [clojure.java.io :as io]
-            [clojure.string :as str])
+            [clojure.string :as str]
+            [clojure.pprint :as pp])
   (:gen-class))
 
 (defn trend-installed?

(defn -main
  "do some fun stuff with csv files"
  [& args]
  (println "give me a file: ")
    (let [file-name (read-line)
          csv-data (read-csv file-name)
          data-map (map create-data-map csv-data)]
    (create-final-list data-map)))

  (filter trend-installed? ping-successful-list)))

(defn create-data-map
  "parse the list of lists returned from read-csv
  If you want more data returned un-comment the fields below"
  [item]
  (let [[ip cp-name domain mac-ad off-scan-status ping prod-name platform os-server version patt-file scan-eng prev-pol cp-des rem-install] item]
    {:ip ip
     ;; :cp-name cp-name
     ;; :domain domain
     ;; :mac-ad mac-ad
     :off-scan-status off-scan-status
     :ping ping
     ;; :prod-name prod-name
     :platform platform
     ;; :os-server os-server
     ;; :version version
     ;; :patt-file patt-file
     ;; :scan-eng scan-eng
     ;; :prev-pol prev-pol
     ;; :cp-des cp-des
     ;; :rem-install rem-install
     }))

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