>perl -le "print 1.01e30;"
1010000000000000000000000000000
<c>
Similar things happen with long double values:
<c>
>perl -le "print 1.01e17;"
101000000000000000

##</code><code>##

perl -le "print 1.01e14"
101000000000000