Using the code below to send. The gen_tcp:send call returns {error,einval} but I can't figure out why...
-define(TCP_OPTIONS,[binary, {active, false}, {reuseaddr, true}]).
client() ->
case gen_tcp:connect(to_Server(), 8080, ?TCP_OPTIONS) of
{error, Reason} ->
io:format("~p~n",[Reason]);
{ok,My_Socket} ->
Message = {"stuff", hello, "data"},
B_Message = term_to_binary(Message),
OK = gen_tcp:send(My_Socket, {message,B_Message}), % error here
OK = gen_tcp:close(My_Socket)
end.