[perl #129311] Simple Grammar Goes into infinite loop

[Zoffix Znet via RT]

I'm not seeing the bug here, to be honest.

The `Body` is asking for one or more tokens `Text`, *nothing* is a valid match 
for those tokens, so after matching the provided text, your grammar continues 
to match nothing infinite number of times.