for each family surname in the hash (%$families)
   get the value of the 'kid' key for the corresponding family hash
   if the value is 'bart', return the surname
if the for loop completes the value wasn't found, so return or die