my $max_event;
map {$max_event = $_ if $_ > $max_event} keys %{$hash{1}};

##</code><code>##

%hash = (
          1 => {
                  1 => "", #dynamically created
                  name => "",
                  that => "",
                  current_max => 1, 
          },
          2.... # iteration
);