in reply to Maybe Escape in Dynamic RegExps
This does what you want.
my $re = qr/(?<!\Q$c\E)\Q$d\E/;
The \Q . . \E pair is like quotemeta. I've changed the names to protect sort. Extra ( . . ) delimiter pair is cut.
Throwing nuclear weapons into the sun
Making everybody on Earth disappear
A threat from an alien with a mighty robot
A new technology or communications medium
Providing a magic fish to a Miss Universe
Establishing a Group mind
Results (156 votes). Check out past polls.