__DATA__
Llamas:
   Llama1 - data data data
   Llama2 - data data data
Camels:
   Camel1 - data data data
   Camel2 - data data data

__CODE__
# [pseudocode]
foreach (my $groupname = from_datafile()) {
  ## Llamas, Camels, the collections.
  unless (exists $allanimals{$groupname})
     ## Create a new collection if you don't already have one for that animal type.
     my $newcollection = new Animal::Collection($groupname);
     $allanimals{$groupname} = $newcollection;
  }
  my $collection = $allanimals{$groupname};
  # Now work with that collection. Add all your animals in that group.
  foreach $animal (animals_from_datafile()) {
    ## llama1, llama2, etc.
    $collection->add_animal(new Animal($animal, 
$animalstats);
  }
}