Learn me some RabbitMQ with Haskell