gistfile1.txt

(defn filter-by-running [nodes]
  (filter #(= "RUNNING" (str (.getState %))) nodes))

(defn print-ips-for-tag! [tag-str]
  (let [running-nodes (filter-by-running (nodes-with-tag tag-str aws))]
    (println "TAG:     " tag-str)
    (println "PUBLIC: " (map primary-ip running-nodes))
    (println "PRIVATE: " (map private-ip running-nodes)))