my $ignore = '(?:\b'. join('\b|\b', map quotemeta, @ignore). '\b)';

##</code><code>##

my $ignore = '\b(?:' . join("|", map "\Q$_", @ignore) . ')\b';