in reply to Using List::UtilsBy to print max and min values from a hash of hashes

You ask max_by for the maximum of the subhashes' values ($subhash->{$_} will return the value, in your case always "1"). A simple List::Util::max should suffice.

In Section Seekers of Perl Wisdom