perl - Parse::RecDescent と引用符付きの演算子

Question

私は次のようなものを持っています：

((x=2 or y=3 ) and (r=3 and c=3) or (x=5 and g=6))

私は定義しました：

Token : /\w \= \d/
operator or|and
expression : token operator(s)
quoted_expression : "("expression")"
query : expression (s)|quoted_expression(s)

しかし、上記の条件を解析する方法に問題がありますか?