in reply to How to 'escape' a character in a string?

Use the \Q...\E quoting mechanism: 
s/\Q$delim\E/\\$delim/g

[download]

See perlre for details.

Perl 6 - the future is here, just unevenly distributed

In Section Seekers of Perl Wisdom