in reply to build an interpreter in perl

Parse::RecDescent may be what you are looking for

In Section Seekers of Perl Wisdom