my %strToKey2Hash;
foreach my $href ( values %hash ){
  while( my ($key2,$string) = each %$href ){
    push @{$strToKey2Hash{$string}}, $key2;
  }
}