my $date_count = keys %{$events{4}};