use warnings;
use locale;

$m = "3.14e+9" + 0;
$n = "3,14e+9" + 0;

print "\$m is $m\n";
print "\$n is $n\n";