$var =~ s/\,//g; # Substitute all commas with nothing
$var =~ s/\$//g; # Substitute all dollar signs with nothing