http://www.perlmonks.org?node_id=949245


in reply to Re^3: min and max in a hash of hash
in thread min and max in a hash of hash

hi, slight correction

use List::Util qw( min max );

my $min = min map { min values %{$Year{$_}} } keys %Year;
my $max = max map { max values %{$Year{$_}} } keys %Year;

[download]

In Section Seekers of Perl Wisdom