$fd->setsockopt(SOL_SOCKET, SO_LINGER, pack('ss', 1, 1));