[Haskell-beginners] Implementing a toy network proxy