#added by me
	          else
	            	{
	            		print $OUT "$genes[0]\t$genes[1]\t$genes[2]\t$genes[3]\tHUGO_notfound\n";
	             		$i++;
	       	 		}