C:\>perl rec.pl

Enter --> a=2 print 2
2

Enter -->

C:\>perl -MParse::RecDescent -wE "say $Parse::RecDescent::VERSION"
1.967015

C:\>perl -v

This is perl 5, version 16, subversion 3 (v5.16.3) built for MSWin32-x64-multi-thread

##</code><code>##

# ...
   expression : INTEGER OP expression
              { main::expression(@item) }
              | VARIABLE OP expression
              { main::expression(@item) }
              | INTEGER
              | VARIABLE
              <defer: $main::VARIABLE{$item{VARIABLE}} ||= 0 >
              { $main::VARIABLE{$item{VARIABLE}}}
              
   print_instruction  : /print/i expression
                      <defer: print $item{expression}."\n" >
   assign_instruction : VARIABLE "=" expression
                      <defer: $main::VARIABLE{$item{VARIABLE}} = $item{expression} >
# ...

##</code><code>##

Enter --> a=1

Enter --> a=2 print a blah blah

       ERROR (line 1): Invalid instruction: Was expecting assign instruction,
                       or print instruction
Error returned by parsing

Enter --> print a
1