perl - 如何将 foreach 与哈希引用一起使用？

Question

我有这个代码

foreach my $key (keys %ad_grp) {

    # Do something
}

哪个有效。

如果我没有 %ad_grp 会怎样？ ，但作为引用，$ad_grp_ref ，到哈希？

Answer 1

foreach my $key (keys %$ad_grp_ref) {
    ...
}

Perl::Critic和 daxim 推荐款式

foreach my $key (keys %{ $ad_grp_ref }) {
    ...
}

出于对可读性和维护性的考虑(这样当您需要使用 %{ $ad_grp_obj[3]->get_ref() } 而不是 %{ $ad_grp_ref } 时，您无需费力思考要更改的内容)