Parens are special characters in regexes and they need to be escaped: quotemeta:

$str1 = quotemeta "Hi(";
[download]

See also perlre.