riemann-withouth-dns-cache

(defn non-caching-riemann-client
  [{:keys [host port] :as riemann-config}]
  (assert host)
  (assert port)
  (let [c  (riemann.client/tcp-client :host host :port port)]
    ;; disable dns caching
    ;; If we let riemann cache dns lookups, it can't reconnect to the riemann server after that restarts
    (-> c
        .transport
        .transport
        .cacheDns
        (.set false))
    ;; a disconnect is needed to make these changes effective
    (try (riemann/reconnect-client c)
         (catch java.io.IOException e nil))
    c))