Is there a "standard" idiom for calling gen_tcp:send with a timeout? I'd like to say gen_tcp:send(Socket, Data, Timeout) but there is no such (documented) function, my server is queueing, and my process is blocked forever.