$test = "This is a test \", with a double quote in it\n";
print $test;
$test =~ tr/"//d;
print "After tr/\"// this becomes:\n";
print $test;
print "\n";