Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked
 
PerlMonks  

Re^2: Reading notes in gedcom files?

by StarkRavingCalm (Sexton)
on Apr 27, 2010 at 14:43 UTC ( #837117=note: print w/ replies, xml ) Need Help??


in reply to Re: Reading notes in gedcom files?
in thread Reading notes in gedcom files?

Thanks to both of you.

It's leaning toward a formatting issue with the way the source program creates the Gedcom files.

I'll post again with the final outcome.

Thanks, Rich


Comment on Re^2: Reading notes in gedcom files?
Re^3: Reading notes in gedcom files?
by StarkRavingCalm (Sexton) on Apr 29, 2010 at 18:00 UTC

    To close this off, it would seem the Notes field in Gedcom files can accept many formats.

    The script below works as originally expected.

    Thanks for the help.

    #!/bin/perl -w use strict; use Gedcom; my $ged = Gedcom->new(shift); $ged->resolve_xrefs; for my $i ( $ged->individuals ) { for my $n ( $i->note ) { print "========================================\n"; print $i->name, "\n"; if (ref $n) { print $n->get_value, "\n"; } else { print "$n\n"; } #print "========================================\n"; } }

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://837117]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (7)
As of 2014-08-23 17:40 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (175 votes), past polls