foreach my $key (keys(%HoH)){
  foreach my $otherKey (keys($HoH{$key})){
    my $value = $HoH{$key}{$otherKey};    
    my $result = &DO_SOMETHING($value);
  }
}