Help for this page

Select Code to Download


  1. or download this
    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; prin
+t $x;'
  2. or download this
    perl -we 'use POSIX; use locale; setlocale LC_NUMERIC, "fr_FR"; $x = "
+123,45";  print $x; setlocale LC_NUMERIC, ""; $x += 0.1; print $x;'