32:my $only_unique = 1; # eliminate numbers that are just a reordering of digits 43: ## we store only unique "constellations" of digits by sorting and using the 44: ## hash to remove duplicates. we also must sort the value it points to. 45: if ($only_unique) {$n = sortHiLow($n); 46: $nn = sortHiLow($nn);}