$hispaddr = recv(SOCKET, $rtime, 4, 0) || die "recv: $!";