my $loopHashRef = $mod->acls;
foreach (keys %$loopHashRef) {
    print $loopHashRef->{$_};
}

##</code><code>##

my %loopHash = %{$mod->acls};
foreach (keys %loopHash) {
    print $loopHash{$_};
}