in reply to Count non-empty hash values

If you change your map to grep, then your code works correctly.

In Section Seekers of Perl Wisdom