import net/ServerSocket

socket := ServerSocket new("0.0.0.0", 8000, true)

while(true) {
    conn := socket accept()
    reader := conn sock reader()
    conn out write(reader readLine())
    conn close()
}