Re: Accessing this array ref.

[Loops]

You want to loop through the array, printing each item. Since the array is already sorted into groups, you just print a new group header when the value changes:

use feature 'say';
my $type;
for my $entry (@$VAR1) {
        if ( $entry->{type} ne $type ) {
                $type = $entry->{type};
                say $type;
        }
        say "\t$entry->{name} - $entry->{reference}";
}

[Anonymous Monk]

This would do it, I could combined all the data into one variable and print at once instead of printing them in the IF, right?

[Cristoforo]

I don't understand your question. If the data is sorted as Loops said, his solution should work for you.

[Anonymous Monk]

I am sorry, is that at the end of processing I have to pass the values as this:

$template->param('data', $results);