Select Code to Download

my $remove = quotemeta "{ (This Word) }";
print $remove; # See what happened.

my $text   = 'to { (This Word) }';
my $remove = '{ (This Word) }';

$text =~ s/\R//g;
$text =~ s/\Q$remove//; # <-- the \Q means quotemeta