my $code = "\(C\.\*\)\{2\}\/ \&\& \/ $best \| $best\[M\] "; if (/$code/) { ...