Select Code to Download

#!/usr/bin/env perl

...
my $parse_tree = $parse->file($data);

print Dumper $parse_tree;

$VAR1 = undef;

#!/usr/bin/env perl

...
my $parse_tree = $parse->file($data);

print Dumper $parse_tree;

$VAR1 = [
          'file',
...
          'foo',
          'bar'
        ];