include pedigree information into program
[email protected] (Jutta Wrage) Wed, 27 Sep 2017 20:44:12 +0200
| Newsgroups | perl.gedcom |
|---|---|
| Message-ID | <[email protected]> |
Hi!
I do not understand how to get access to the pedigree information for a =
child in a family.
I have this in my code to print out the children in each family of a =
certain person as starting point:
(essentials here only)
my @fams =3D $start->fams;
my @fams =3D $start->fams;=20
for my $fam (@fams)
my @children =3D $fam->children;
for my $child (@children) {
print_person($child);
}
}
print_person is a sub to print information about an individual.
As the PEDI information is in the fam record it seems I have to add =
something in the code above.
Could somebody give me a hint, please?
Regards,
Jutta
--=20
http://www.witch.westfalen.de