in reply to pattern match special char

i think you just need to escape the "(" in your regular expression: 
$a = 'sd\(sd\)sd';

[download]
it's now printing "yes" for me.

In Section Seekers of Perl Wisdom