This is my string that has a | in it.

##</code><code>##

This is my string that has a \| in it.

##</code><code>##

$_ =~ s/\|/\\\|/g;

##</code><code>##

$_ =~ s/\{$delim}/\\{$delim}/g;