my $segsites = Bio::PopGen::Statistics->segregating_sites_count( \@samples );