Select Code to Download

my $text = <<TEXT;
    A B
...

use Data::Dumper;
print Dumper \@result;

$VAR1 = [
          [
...
            'c'
          ]
        ];

...
my @rxs = (
...
        push @result, [ @grps ];
    }
}