Help for this page

Select Code to Download

Select or download this

use strict;

...
$line =~ s/(\Q$string\E)/\\$1/;  

print "$line\n";

Select or download this
```
((1+2)-4)*(2\+5^7)
```