for my $r (@values) {
    for my $k (keys %$r) {
        print "$k: $r->{$k}\n";
    }
}