foreach $key (sort keys %npanxxhash) {
    &CountAndHash($key,\@npanxxarray,\%npanxxhash);
}