C:\Windows\system32>perl -E" say 1+1/2**47;"                                   
1.00000000000001
C:\Windows\system32>perl -E" say 1+1/2**48;"
1