Code from my ErlangDC 2013 talk: a simple websocket chat