$arg =~ s/(\\(?!.*\\)|\\(?=\\)|")/\\$1/g;