in reply to Counting unique(ish) elements in a hash

my $sequenceNumber = 0;
foreach my $keyValue (keys %familyInfo)
{
     $sequenceNumber++;
     # Do something with the sequence number
}

[download]

In Section Seekers of Perl Wisdom