/g;
```
---
### Author:  [@crozell](https://boards.straightdope.com/u/crozell)
#### Post date: [August 19, 2003, 9:35pm UTC](https://boards.straightdope.com/t/perl-programming-question-search-replace/196244/7 "2003-08-19T21:35:07Z")
**tschild** , that worked perfectly. It also makes sense now that you would need to escape it twice (though I never would’ve though of that). Thank you so much!
**Terminus** , just FYI, it appears to work for me BOTH ways (if I escape the “{”, but also if I don’t).
---
### Author:  [@Kempis](https://boards.straightdope.com/u/Kempis)
#### Post date: [August 21, 2003, 8:15pm UTC](https://boards.straightdope.com/t/perl-programming-question-search-replace/196244/8 "2003-08-21T20:15:01Z")
Why would you need four backslashes if there’s only one backslash in the original string? Wouldn’t that match two backslashes in the original string?
If it worked I’m guessing the OP had another typo and the original string was “{\em”
-k
---
### Author:  [@Terminus\_Est](https://boards.straightdope.com/u/Terminus_Est)
#### Post date: [August 21, 2003, 8:39pm UTC](https://boards.straightdope.com/t/perl-programming-question-search-replace/196244/9 "2003-08-21T20:39:17Z")
Ah the mysteries of Perl variable interpolation. When you assign a string to a scalar using double quotes:
```auto
$find = "{\\em"
```
Perl interprets the double backslash as a single backslash before it reaches the regex parser. So the regex parser only sees a single backslash, then inteprets the “\e” as an ASCII ESC character. To get around this, you need to backslash-escape _both_ backslashes, or you can use single quotes, or use the search string in s/// directly. The latter is a good idea in any case because putting a variable in s/// forces the compiler to do extra work.
Ref: Programming Perl, 3rd ed. pp. 191-193
**crozell** : You’ve solved your problem, but I’m curious (and too lazy to do it myself). What happens if you say:
```auto
$find = '{\\em' # Single quotes!
$replace = '';
$infile =~ s/$find/$replace/g;
```
---
### Author:  [@DoubleJ](https://boards.straightdope.com/u/DoubleJ)
#### Post date: [August 21, 2003, 8:48pm UTC](https://boards.straightdope.com/t/perl-programming-question-search-replace/196244/10 "2003-08-21T20:48:33Z")
It’s because the OP was putting the text to be replaced in a variable. He wanted to replace **{\em**. When that’s placed in the replace command, the backslash needed to be escaped, so **{\em**. Now, if you use a variable to send that information, the variable needs to contain **{\em**. But to put that into the variable, the backslahes each need to be escaped again, hence **{\\em**.
(On preview: yeah, what Terminus said.)
---
### Author:  [@crozell](https://boards.straightdope.com/u/crozell)
#### Post date: [August 21, 2003, 9:57pm UTC](https://boards.straightdope.com/t/perl-programming-question-search-replace/196244/11 "2003-08-21T21:57:33Z")
**Terminus** , I tried it with the single quotes and it didn’t seem to work. Sorry!
It may seem (from the OP) that I am doing extra work by putting the search strings in a variable, but I have several strings I’m trying to replace in the same file. There may be better ways to do this, but I’m a novice at Perl and don’t use it often enough to put a lot of work learning it completely. If there is obviously a better way to do this and I’m just missing it, please let me know!
Thanks again for the help everyone!
---
### Author:  [@PVenkman](https://boards.straightdope.com/u/PVenkman)
#### Post date: [August 21, 2003, 10:20pm UTC](https://boards.straightdope.com/t/perl-programming-question-search-replace/196244/12 "2003-08-21T22:20:40Z")
If you want to use single quotes, this works:
$find = ‘{\\em’;
That initial { still has to be escaped. At least this worked for me, and I assume that’s why.
Probably the easiest way to handle this kind of thing in general is to use the quotemeta function, as follows:
$find = quotemeta(’{\em’);
quotemeta will figure out all the escape characters for you.
---
### Author:  [@Terminus\_Est](https://boards.straightdope.com/u/Terminus_Est)
#### Post date: [August 21, 2003, 10:20pm UTC](https://boards.straightdope.com/t/perl-programming-question-search-replace/196244/13 "2003-08-21T22:20:40Z")
Ach, you probably need to backslash the curly brace if you use single quotes.
**crozell** : Looks like you’ve got a legitimate use for variable interpolation in s///. Your script sounds like a one-off deal (or is rarely run). So if it works for you, don’t sweat it!