my %hash;
$hash{$_->{'type'}}{$_->{'name'}}{'total'} = $_->{'total'} for @$array;
$hash{$_->{'type'}}{$_->{'name'}}{'id'} = $_->{'id'} for @$array; 

print "Results:\n";

for my $k1 (sort keys %hash) {
    print "    $k1:\n";
    for my $k2 (sort keys %{$hash{$k1}}) {
        print "        id - $hash{$k1}{$k2}{'id'} - $k2 - $hash{$k1}{$k2}{'total'}\n";
    }
}