C:\>perl -le "$x = (2**1025) / (2**1025);print $x;" -1.#IND