$s="a (b) c";
$_=$s;

if (/$s/) {
    print "Found it!\n";
} else {
    print "Not found\n";
}