note
lima1
Hm, It seems to work if you use locale:
<code>
perl -we 'use POSIX; use locale; setlocale LC_NUMERIC, "fr_FR"; $x = "123,45"; $x+=0.1; print $x; setlocale LC_NUMERIC, ""; $x += 0.1; print $x;'
</code>
Update: this does not work:
<code>
perl -we 'use POSIX; use locale; setlocale LC_NUMERIC, "fr_FR"; $x = "123,45"; print $x; setlocale LC_NUMERIC, ""; $x += 0.1; print $x;'
</code>
So what I do now is to add 0 if it looks_like_number() and everything works fine. At least what I've tested until now...
852538
852569