bind(SOCKET, pack_sockaddr_in(0, $ipaddr)) || die "can't bind socket to local address";