Select Code to Download

#!/usr/bin/perl
use warnings;
...
    my $value_ref = $grammar->parse(\$case, 'main');
    use Data::Dumper; print Dumper $$value_ref;
}