if($_=~/^(\d+)\t(.*)/)
{	
	$id=$1;
	$rest=$2;

	@split_rest = split(/\t/, $rest);
	$first_num=$split_rest[0];
	$second_num=$split_rest[1];

	$HoH{$id}{$first_num} = $second_num;