Formatting fixes.
Wrap the peer functionality into a StateT IO monad.
Send correct header information.

The client is now receiving responses from other peers.