Skip to content

Instantly share code, notes, and snippets.

@martinklepsch

martinklepsch/pod-loop.clj

Created October 22, 2015 18:30
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save martinklepsch/289481a7ebbee3fd09c6 to your computer and use it in GitHub Desktop.
Save martinklepsch/289481a7ebbee3fd09c6 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
pod-loop.clj
#!/usr/bin/env boot
(require '[boot.pod :as pod])
(defonce pods
(pod/pod-pool (get-env)))
(defn -main [& args]
(loop [i 0]
(let [c-pod (pods :refresh)]
(boot.util/info "New pod taken: %s\n" c-pod)
(pod/with-eval-in c-pod
(boot.util/info "Hi from pod no. %s.\n" ~i))
(recur (inc i)))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment