PythonからRacketへの移行（正規表現ライブラリと "Racket Way"）

Question

私はRacketを習得しようとしていますが、その過程でPythonフィルタを書き直そうとしています。私は私のコード内の関数の次のペアを持っている：

def dlv(text): 
    """ 
    Returns True if the given text corresponds to the output of DLV 
    and False otherwise. 
    """ 
    return text.startswith("DLV") or \ 
      text.startswith("{") or \ 
      text.startswith("Best model") 

def answer_sets(text): 
    """ 
    Returns a list comprised of all of the answer sets in the given text. 
    """ 
    if dlv(text): 
     # In the case where we are processing the output of DLV, each 
     # answer set is a comma-delimited sequence of literals enclosed 
     # in {} 
     regex = re.compile(r'\{(.*?)\}', re.MULTILINE) 
    else: 
     # Otherwise we assume that the answer sets were generated by 
     # one of the Potassco solvers. In this case, each answer set 
     # is presented as a comma-delimited sequence of literals, 
     # terminated by a period, and prefixed by a string of the form 
     # "Answer: #" where "#" denotes the number of the answer set. 
     regex = re.compile(r'Answer: \d+\n(.*)', re.MULTILINE) 
    return regex.findall(text) 

私はラケットの最初の関数の実装は、次の線に沿って何かだろう伝えることができるものから：動作しているように見えます

(define (dlv-input? text) 
    (regexp-match? #rx"^DLV|^{|^Best model" text)) 

正しく第二の機能の実装に取り​​組んで、私は現在、以下の（で開始する）が出ている：

(define (answer-sets text) 
    (cond 
     [(dlv-input? text) (regexp-match* #rx"{(.*?)}" text)])) 

regexp-match*を含めて、正規表現にマッチする文字列のリストを与えるので、これは正しくありません。中括弧。誰もがPythonの実装と同じ振る舞いをする方法を知っていますか？また、正規表現を「より良く」する方法の提案もあれば幸いです。

Answer 1

あなたは非常に近いです。あなたは、単にあなたのregexp-matchコールに#:match-select cadrを追加する必要があります。

(regexp-match* #rx"{(.*?)}" text #:match-select cadr) 

デフォルトでは、#:match-selectは全体マッチした文字列を返す、carの値を持ちます。 cadrは第1のグループを選択し、caddrは第2のグループを選択します。詳細はregexp-match* documentationを参照してください。