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