Select Code to Download

  /(?x:((?-x:)) # (comment)
  )/

  /((?-x:)) # (comment)
  /x

            else if (s[2] == '{' /* This should match regcomp.c */
                     || ((s[2] == 'p' || s[2] == '?') && s[3] == '{'))

  our $re_true = qr{(?=)}x;
  our $re_false = qr{(?!)}x;
...
    )+?
    (??{ $count == 0 ? $re_true : $re_false })
  /xgc;