foreach my $key (keys %$hash_ref) {
    my $value = $hash_ref->{$key};
    ...
}