- or download this
use strict;
use warnings;
...
my $parser = Parse::RecDescent->new($grammar);
defined $parser->start("ABCD") or die "didn't match";
- or download this
use strict;
use warnings;
...
my $parser = Parse::RecDescent->new($grammar);
defined $parser->start("ABCD") or die "didn't match";
- or download this
Character: A
Character: B
Character: C
Character: D
Found: 1111