I would modify the query appropriately.

As a bad alternative, consider the values keyword:

for my $row (@$values) {
    for( values %$row) {
        ...
    };
};
[download]