erlang_server.erl

send_expect(Send, Expect, Socket) ->
    io:format("Sending '~s'~n", [Send]),
    ok = enm:send(Socket, Send),

    receive
        {nnreq, Socket, Expect} ->
            io:format("Received '~s'~n", [Expect]);
        {nnreq, Socket, Other} ->
            io:format("Received UNEXPECTED '~s'~n", [Other])
    end.