defmoduleOctochat.Echodo@moduledoc""" Octochat Echo server """defserve(socket)dosocket|>read_line!()|>write_line!(socket)serve(socket)enddefpread_line!(socket)do{:ok,line}=:gen_tcp.recv(socket,0)lineenddefpwrite_line!(line,socket)do:gen_tcp.send(socket,line)endend