You are hitting the limits of Perl's default precision. You will need to devise some way to either force perl to think that your numbers are strings (default values in you bound variables?) or make Perl use a greater precision. See the following examples:

$ perl -le '$foo = 11.3700000000000016; print $foo'
11.37
$ perl -le '$foo =   .00000000000016; print $foo'
1.6e-13
$ perl -le '$foo =  1.00000000000016; print $foo'
1.00000000000016
$ perl -le '$foo =  1.3700000000000016; print $foo'
1.37
$ perl -le '$foo =  1.370000000000016; print $foo'
1.37000000000002
$ perl -le '$foo =   .370000000000016; print $foo'
0.370000000000016
[download]