if (@events = grep { $_ eq $event } @{ $region_of_state{$region_of_state} }) {