$re = "(?$flags:$core)"; if($input =~ $re) { ... }