@a = (5 .. 10); print $a['inf'], "\n", $a[-inf], "\n", -inf==0 ? "-inf is zero\n" : "-inf isn't zero\n", 'inf'==0 ? "inf is zero\n" : "inf isn't zero\n"; # still outputs 10 and 5 and states that the infinities aren't zeroes