OUTER: foreach my $animal (@{$twoDimArray[0]}) {