sub tester {
  my @holder = @{$HoH{$newcounter}{'holder'}};
  my @ind = @{$HoH{$newcounter}{'individual'}};
  my %HoHMarker = %{$HoH{$newcounter}{'marker'}};