use Gedcom; my $ged = Gedcom->new; my $ged = Gedcom->new($gedcom_file); my $ged = Gedcom->new(grammar_version => "5.5.1", gedcom_file => $gedcom_file, read_only => 1 ...