{IP, Port} = proplists:get_value(listen_addr, Args),

    {_IP, Port} = proplists:get_value(listen_addr, Args),

handle_info({peer_data, Socket, PeerAddr, Data}, State = #state{event_handler = Handler}) ->

handle_info({peer_data, _Socket, PeerAddr, Data}, State = #state{event_handler = Handler}) ->

        {ok, ConnPid} ->

        {ok, _ConnPid} ->