(defn -main [& args]
    (let [flounder {:name "flounder.dyndns.org" :port 6998}
          user {:name "botley bottington" :nick "test"}
          irc (connect flounder)]
        (login irc user)
        (join irc "#room")
        (join irc "#urkl")
        (message irc "#room" "stuff")))