$string =~ s/\\/\\\backslash/g;