Как избежать обратной косой черты

Question

Я пытаюсь заменить ( на \(, используя регулярное выражение в perl.Это оказывается проблематичным.

$var =~ s/\(/\\\(/g

не похоже на работу.Выражение не исключает обратную косую черту во второй раз, и в результате получается \\(

Есть какие-нибудь хитрости, чтобы сделать эту работу?

Спасибо.

Вы, ребята, были правы.Мой код работает.Он отображался по-другому в командной строке, потому что не интерпретировал его.Извините за потраченное время.

Answer 1

Как насчет этого:

$var =~ s/\(/\\\\\(/g

Answer 2

Вам нужно сбежать \

perl -e '$var = "((test))"; $var =~ s/\(/\\\\\(/g; print $var'
\\(\\(test))

Answer 3

Вот код, который вы ищете, замените "/" на другой разделитель, это будет легко.