Select Code to Download

#!/usr/bin/perl
use warnings;
...
my $grammar = 'Marpa::R2::Scanless::G'->new( { source => \$dsl } );
my $value_ref = $grammar->parse( \$input, 'main' );
print Dumper $value_ref;

$VAR1 = \[
            {
...
              'name3' => 'value3'
            }
          ];