Select Code to Download

use strict;
use warnings;
...
my $parser = new Parse::RecDescent($grammar) or die;
my $data = $parser->test("x = 1 y = 2 z = 3") or die;
print Dumper $data;