Select Code to Download

$frsmt =~ tr[.][]d; # eliminate all dots from the number
$frsmt =~ tr[,][.]d; # turn all commas into dots

$frsmt =~ tr[,.][.]d; # eliminate all dots from the number and turn al
+l commas into dots