for my $protein ( keys %{$rHoH{$name}}) 
	{
      		print "$protein=$rHoH{$name}{$protein}";
	}