use Yet::Another::Grammar;
my $parser = Yet::Another::Grammar->new();