comment on

I switched to Marpa::R2 instad of Parse::RecDescent. I had to change the grammar a bit to make it work:

#!/usr/bin/perl
use warnings;
use strict;

use Marpa::R2;
use Data::Dumper;

my $dsl = << '__DSL__';
:default ::= action => [values]
lexeme default = latm => 1

seq     ::= '(' seqstrs ')'
seqstrs ::= seqstr seqstrs | seqstr
seqstr  ::= seq | tagstr
tagstr  ::= OZN seq | OZN rijec

OZN      ~ [A-Z.,?'*:`]+
rijec    ~ [\w\-?,:<*`*]+
space    ~ [\s]+
:discard ~ space
__DSL__

my $grammar = 'Marpa::R2::Scanless::G'->new({ source => \$dsl });

my $input = "(SBARQ (WHNP (WP Who))(SQ (VP (VBZ says)(, ,)(S (SBAR (``
+ ``)(IN If)(S (NP (PRP you))(VP (VBP do)(RB n<t)(VP (VB look)(ADJP (J
+J good)))))(, ,)(S (NP (PRP we))(VP (VBP do)(RB n<t)(VP (VB look)(ADJ
+P (JJ good)('' <<)))))))))(? ?))";

my $result = $grammar->parse(\$input);
print Dumper($result);
[download]

It seems you confused ( and '(' . Marpa doesn't know the (s) , you have to enumerate the alternatives.

Output:

$VAR1 = \[
            '(',
            [
              [
                [
                  'SBARQ',
                  [
                    '(',
                    [
                      [
                        [
                          'WHNP',
                          [
                            '(',
                            [
                              [
                                [
                                  'WP',
                                  'Who'
                                ]
                              ]
                            ],
                            ')'
                          ]
                        ]
                      ]
                    ],
                    ')'
                  ]
                ]
              ],
              [
                [
                  [
                    '(',
                    [
                      [
                        [
                          'SQ',
                          [
                            '(',
                            [
                              [
                                [
                                  'VP',
                                  [
                                    '(',
                                    [
                                      [
                                        [
                                          'VBZ',
                                          'says'
                                        ]
                                      ]
                                    ],
                                    ')'
                                  ]
                                ]
                              ],
                              [
                                [
                                  [
                                    '(',
                                    [
                                      [
                                        [
                                          ',',
                                          ','
                                        ]
                                      ]
                                    ],
                                    ')'
                                  ]
                                ],
                                [
                                  [
                                    [
                                      '(',
                                      [
                                        [
                                          [
                                            'S',
                                            [
                                              '(',
                                              [
                                                [
                                                  [
                                                    'SBAR',
                                                    [
                                                      '(',
                                                      [
                                                        [
                                                          [
                                                            '``',
                                                            '``'
                                                          ]
                                                        ]
                                                      ],
                                                      ')'
                                                    ]
                                                  ]
                                                ],
                                                [
                                                  [
                                                    [
                                                      '(',
                                                      [
                                                        [
                                                          [
                                                            'IN',
                                                            'If'
                                                          ]
                                                        ]
                                                      ],
                                                      ')'
                                                    ]
                                                  ],
                                                  [
                                                    [
                                                      [
                                                        '(',
                                                        [
                                                          [
                                                            [
                                                              'S',
                                                              [
                                                                '(',
                                                                [
                                                                  [
                                                                    [
                                                                      
+'NP',
                                                                      
+[
                                                                      
+  '(',
                                                                      
+  [
                                                                      
+    [
                                                                      
+      [
                                                                      
+        'PRP',
                                                                      
+        'you'
                                                                      
+      ]
                                                                      
+    ]
                                                                      
+  ],
                                                                      
+  ')'
                                                                      
+]
                                                                    ]
                                                                  ]
                                                                ],
                                                                ')'
                                                              ]
                                                            ]
                                                          ],
                                                          [
                                                            [
                                                              [
                                                                '(',
                                                                [
                                                                  [
                                                                    [
                                                                      
+'VP',
                                                                      
+[
                                                                      
+  '(',
                                                                      
+  [
                                                                      
+    [
                                                                      
+      [
                                                                      
+        'VBP',
                                                                      
+        'do'
                                                                      
+      ]
                                                                      
+    ]
                                                                      
+  ],
                                                                      
+  ')'
                                                                      
+]
                                                                    ]
                                                                  ],
                                                                  [
                                                                    [
                                                                      
+[
                                                                      
+  '(',
                                                                      
+  [
                                                                      
+    [
                                                                      
+      [
                                                                      
+        'RB',
                                                                      
+        'n<t'
                                                                      
+      ]
                                                                      
+    ]
                                                                      
+  ],
                                                                      
+  ')'
                                                                      
+]
                                                                    ],
                                                                    [
                                                                      
+[
                                                                      
+  [
                                                                      
+    '(',
                                                                      
+    [
                                                                      
+      [
                                                                      
+        [
                                                                      
+          'VP',
                                                                      
+          [
                                                                      
+            '(',
                                                                      
+            [
                                                                      
+              [
                                                                      
+                [
                                                                      
+                  'VB',
                                                                      
+                  'look'
                                                                      
+                ]
                                                                      
+              ]
                                                                      
+            ],
                                                                      
+            ')'
                                                                      
+          ]
                                                                      
+        ]
                                                                      
+      ],
                                                                      
+      [
                                                                      
+        [
                                                                      
+          [
                                                                      
+            '(',
                                                                      
+            [
                                                                      
+              [
                                                                      
+                [
                                                                      
+                  'ADJP',
                                                                      
+                  [
                                                                      
+                    '(',
                                                                      
+                    [
                                                                      
+                      [
                                                                      
+                        [
                                                                      
+                          'JJ',
                                                                      
+                          'good'
                                                                      
+                        ]
                                                                      
+                      ]
                                                                      
+                    ],
                                                                      
+                    ')'
                                                                      
+                  ]
                                                                      
+                ]
                                                                      
+              ]
                                                                      
+            ],
                                                                      
+            ')'
                                                                      
+          ]
                                                                      
+        ]
                                                                      
+      ]
                                                                      
+    ],
                                                                      
+    ')'
                                                                      
+  ]
                                                                      
+]
                                                                    ]
                                                                  ]
                                                                ],
                                                                ')'
                                                              ]
                                                            ]
                                                          ]
                                                        ],
                                                        ')'
                                                      ]
                                                    ],
                                                    [
                                                      [
                                                        [
                                                          '(',
                                                          [
                                                            [
                                                              [
                                                                ',',
                                                                ','
                                                              ]
                                                            ]
                                                          ],
                                                          ')'
                                                        ]
                                                      ],
                                                      [
                                                        [
                                                          [
                                                            '(',
                                                            [
                                                              [
                                                                [
                                                                  'S',
                                                                  [
                                                                    '(
+',
                                                                    [
                                                                      
+[
                                                                      
+  [
                                                                      
+    'NP',
                                                                      
+    [
                                                                      
+      '(',
                                                                      
+      [
                                                                      
+        [
                                                                      
+          [
                                                                      
+            'PRP',
                                                                      
+            'we'
                                                                      
+          ]
                                                                      
+        ]
                                                                      
+      ],
                                                                      
+      ')'
                                                                      
+    ]
                                                                      
+  ]
                                                                      
+]
                                                                    ],
                                                                    ')
+'
                                                                  ]
                                                                ]
                                                              ],
                                                              [
                                                                [
                                                                  [
                                                                    '(
+',
                                                                    [
                                                                      
+[
                                                                      
+  [
                                                                      
+    'VP',
                                                                      
+    [
                                                                      
+      '(',
                                                                      
+      [
                                                                      
+        [
                                                                      
+          [
                                                                      
+            'VBP',
                                                                      
+            'do'
                                                                      
+          ]
                                                                      
+        ]
                                                                      
+      ],
                                                                      
+      ')'
                                                                      
+    ]
                                                                      
+  ]
                                                                      
+],
                                                                      
+[
                                                                      
+  [
                                                                      
+    [
                                                                      
+      '(',
                                                                      
+      [
                                                                      
+        [
                                                                      
+          [
                                                                      
+            'RB',
                                                                      
+            'n<t'
                                                                      
+          ]
                                                                      
+        ]
                                                                      
+      ],
                                                                      
+      ')'
                                                                      
+    ]
                                                                      
+  ],
                                                                      
+  [
                                                                      
+    [
                                                                      
+      [
                                                                      
+        '(',
                                                                      
+        [
                                                                      
+          [
                                                                      
+            [
                                                                      
+              'VP',
                                                                      
+              [
                                                                      
+                '(',
                                                                      
+                [
                                                                      
+                  [
                                                                      
+                    [
                                                                      
+                      'VB',
                                                                      
+                      'look'
                                                                      
+                    ]
                                                                      
+                  ]
                                                                      
+                ],
                                                                      
+                ')'
                                                                      
+              ]
                                                                      
+            ]
                                                                      
+          ],
                                                                      
+          [
                                                                      
+            [
                                                                      
+              [
                                                                      
+                '(',
                                                                      
+                [
                                                                      
+                  [
                                                                      
+                    [
                                                                      
+                      'ADJP',
                                                                      
+                      [
                                                                      
+                        '(',
                                                                      
+                        [
                                                                      
+                          [
                                                                      
+                            [
                                                                      
+                              'JJ',
                                                                      
+                              'good'
                                                                      
+                            ]
                                                                      
+                          ]
                                                                      
+                        ],
                                                                      
+                        ')'
                                                                      
+                      ]
                                                                      
+                    ]
                                                                      
+                  ],
                                                                      
+                  [
                                                                      
+                    [
                                                                      
+                      [
                                                                      
+                        '(',
                                                                      
+                        [
                                                                      
+                          [
                                                                      
+                            [
                                                                      
+                              '\'\'',
                                                                      
+                              '<<'
                                                                      
+                            ]
                                                                      
+                          ]
                                                                      
+                        ],
                                                                      
+                        ')'
                                                                      
+                      ]
                                                                      
+                    ]
                                                                      
+                  ]
                                                                      
+                ],
                                                                      
+                ')'
                                                                      
+              ]
                                                                      
+            ]
                                                                      
+          ]
                                                                      
+        ],
                                                                      
+        ')'
                                                                      
+      ]
                                                                      
+    ]
                                                                      
+  ]
                                                                      
+]
                                                                    ],
                                                                    ')
+'
                                                                  ]
                                                                ]
                                                              ]
                                                            ],
                                                            ')'
                                                          ]
                                                        ]
                                                      ]
                                                    ]
                                                  ]
                                                ]
                                              ],
                                              ')'
                                            ]
                                          ]
                                        ]
                                      ],
                                      ')'
                                    ]
                                  ]
                                ]
                              ]
                            ],
                            ')'
                          ]
                        ]
                      ]
                    ],
                    ')'
                  ]
                ],
                [
                  [
                    [
                      '(',
                      [
                        [
                          [
                            '?',
                            '?'
                          ]
                        ]
                      ],
                      ')'
                    ]
                  ]
                ]
              ]
            ],
            ')'
          ];
[download]

($q=q:Sq=~/;[c](.)(.)/;chr(-||-|5+lengthSq)`"S|oS2"`map{chr |+ord
}map{substrSq`S_+|`|}3E|-|`7**2-3:)=~y+S|`+$1,++print+eval$q,q,a,
[download]

In reply to Re: converting context free grammar to BNF by choroba
in thread converting context free grammar to BNF by nido203

Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!

Titles consisting of a single word are discouraged, and in most cases are disallowed outright.

Read Where should I post X? if you're not absolutely sure you're posting in the right place.

Please read these before you post! —

Posts may use any of the Perl Monks Approved HTML tags:

a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr

You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)

	For:		Use:
	&		`&`
	<		`<`
	>		`>`
	[		`[`
	]		`]`

Link using PerlMonks shortcuts! What shortcuts can I use for linking?

See Writeup Formatting Tips and other pages linked from there for more info.