simple irc bot in haskell, for fun