$ perl -e '$x = (2**1025) / (2**1025);print $x;' nan