On 20/09/10 12:20, David Golden wrote:
The culprit appears to be this:
cpan[2]> ! printf "%g\n", 0 + (1< 0)
3.33761e-308
The code is doing something equivalent -- though I'm not sure why.
But perl is adding 0 + 0 and getting 3.34e-308 when it numifies it.
That seems like a bug in perl on that platform. If you run that from
the command line, do you get the same thing?
$ perl -e 'printf "%g\n", 0 + (1< 0)'
$ perl -e 'printf "%f\n", 0 + (1 < 0)'
0.000000
$ perl -e 'printf "%g\n", 0 + (1 < 0)'
3.33761e-308
$
-Nigel
--
Nigel Horne. Arranger, Adjudicator, Band Trainer, Composer, Tutor, Typesetter.
NJH Music, ICQ#20252325, twitter: @nigelhorne
n...@bandsman.co.uk http://www.bandsman.co.uk