ok("$PINF" eq '1.#INF', "positive infinity, $PINF");