Регулярное выражение Perl (с использованием переменной в качестве строки поиска с включенными символами оператора Perl)

$text_to_search = "example text with [foo] and more";
$search_string = "[foo]";

if ($text_to_search =~ m/$search_string/)
    print "wee";

Пожалуйста, обратите внимание на приведенный выше код. По какой-то причине я хотел бы найти текст «[foo]» в переменной $ text_to_search и вывести «wee», если я его найду. Для этого я должен был убедиться, что [и] заменен на [и], чтобы Perl обрабатывал его как символы, а не операторы.

Как я могу сделать это без предварительной замены [ и ] с \ [ и \] с использованием выражения s /// ?