A simple tcp proxy written in erlang