#foreach my $symb (sort keys %go_hash) {
#foreach my $UniID (keys %{ $go_hash{$symb} }) {
#foreach my $TaX (keys %{ $go_hash{$symb}{$UniID} }) {
#print "$symb, $UniID, $go_hash{$symb}{$UniID}{$TaX}\n";
#}
#}
#}