http://qs321.pair.com?node_id=589153

fce2 has asked for the wisdom of the Perl Monks concerning the following question:

When matching terminals, Parse::RecDescent seems to produce a match if a token begins with the terminal, rather than trying for an exact match. This code demonstrates this:

#!/usr/bin/perl use warnings; use strict; use Parse::RecDescent; my $grammar = q{ FOO: "foo" }; my $p = Parse::RecDescent->new($grammar); my @tests = ("foo", "foo ", "foo bar", "football", "fog", "barfoo", "b +ar foo"); for my $test (@tests) { if (my $ret = $p->FOO($test)) { print "match: '$test' -> '$ret'\n"; } else { print "no match: '$test'\n"; } }

This isn't what I want. I want it to produce an error/return undef when what was entered doesn't match in full, rather than simply eating the remainder.

I doubt this is a bug, because it seems too trivial, so I suspect that this is actually a lack of understanding of parsing in general on my part. Could someone please set me straight here? Thanks!