$ perl -we'use POSIX; setlocale LC_NUMERIC, "fr_FR"; print 0+"123,45"'
Argument "123,45" isn't numeric in addition (+) at -e line 1.
123