$sock->send($request) or die "send: $!";