@temp = split;
	  push @{$haplotypes{$currentPop}}, [@temp];