foreach (keys %insitution_table)
{
     $institution_table{$_}{ages}[$age/5]++;
}