core.clj

(ns cb.core
  (:use [clojure.tools.cli :as cli])
  (:gen-class))

(defn -main [& args]
  (println args)
  (let [[parsed-args _ _] (cli/cli args ["-m" "--main" "Main namespace"])]
    (cond (nil? (:main parsed-args)) (println "Nothing to do here...")
          :else (do
                  (println "Executing namespace " (:main parsed-args) ".")
                  (use (quote [(:main parsed-args) :as the-ns]))
                  (the-ns/-main)))))