Hello, this is my first ever go at Perl. For starters, I want to open a GEDCOM text file and count the number of lines in the file, and read a line. The script below does not work for me.It shows the count as 1, and no record is shown for the 10th record Can anyone please assist?
#!/usr/bin/perl open(MYFILE, "C:/Users/Jill/Documents/Genealogy/birdt.ged") || die; @MyGed=birdt.ged; $count=@MyGed; print "10th record : $MyGed[10]\n"; print "No. of records : $count \n";
In reply to How to read a GEDCOM file by JillB
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |