Gedcom::Event(3pm) User Contributed Perl Documentation Gedcom::Event(3pm)NAME
Gedcom::Event - a module to manipulate Gedcom events
Version 1.16 - 24th April 2009
SYNOPSIS
use Gedcom::Event;
DESCRIPTION
A selection of subroutines to handle events in a gedcom file.
Derived from Gedcom::Record.
HASH MEMBERS
None.
METHODS
None yet.
Individual functions
perl v5.14.2 2012-04-12 Gedcom::Event(3pm)
Check Out this Related Man Page
Gedcom::Individual(3pm) User Contributed Perl Documentation Gedcom::Individual(3pm)NAME
Gedcom::Individual - a module to manipulate Gedcom individuals
Version 1.16 - 24th April 2009
SYNOPSIS
use Gedcom::Individual;
my $name = $i->name;
my @rel = $i->father;
my @rel = $i->mother;
my @rel = $i->parents;
my @rel = $i->husband;
my @rel = $i->wife;
my @rel = $i->spouse;
my @rel = $i->siblings;
my @rel = $i->brothers;
my @rel = $i->sisters;
my @rel = $i->children;
my @rel = $i->sons;
my @rel = $i->daughters;
my @rel = $i->descendents;
my @rel = $i->ancestors;
my $ok = $i->delete;
my @fam = $i->famc;
my @fam = $i->fams;
DESCRIPTION
A selection of subroutines to handle individuals in a gedcom file.
Derived from Gedcom::Record.
HASH MEMBERS
None.
METHODS
name
my $name = $i->name;
Return the name of the individual, with spaces normalised.
cased_name
my $cased_name = $i->cased_name;
Return the name of the individual, with spaces normalised, and surname in upper case.
surname
my $surname = $i->surname;
Return the surname of the individual.
given_names
my $given_names = $i->given_names;
Return the given names of the individual, with spaces normalised.
soundex
my $soundex = $i->soundex;
Return the soundex code of the individual. This function is only available if Text::Soundex.pm is available.
sex
my $sex = $i->sex;
Return the sex of the individual, "M", "F" or "U".
Individual functions
my @rel = $i->father;
my @rel = $i->mother;
my @rel = $i->parents;
my @rel = $i->husband;
my @rel = $i->wife;
my @rel = $i->spouse;
my @rel = $i->siblings;
my @rel = $i->older_siblings;
my @rel = $i->younger_siblings;
my @rel = $i->brothers;
my @rel = $i->sisters;
my @rel = $i->children;
my @rel = $i->sons;
my @rel = $i->daughters;
my @rel = $i->descendents;
my @rel = $i->ancestors;
Return a list of individuals related to $i.
Each function, even those with a singular name such as father(), returns a list of individuals holding that relation to $i.
More complex relationships can easily be found using the map function. eg:
my @grandparents = map { $_->parents } $i->parents;
delete
my $ok = $i->delete;
Delete $i from the data structure.
This function will also set $i to undef. This is to remind you that the individual cannot be used again.
Returns true iff $i was successfully deleted.
Family functions
my @fam = $i->famc;
my @fam = $i->fams;
Return a list of families to which $i belongs.
famc() returns those families in which $i is a child. fams() returns those families in which $i is a spouse.
perl v5.14.2 2012-04-12 Gedcom::Individual(3pm)
I have a huge matrix file containing some 1.5 million rows and 6000 columns. The matrix looks something like this:
1 2 3
4 5 6
7 8 9
3 4 5
I want to add all the numbers in the columns of this matrix and display the result to my stdout. This means that the numbers in the first column are:
... (2 Replies)
Hi,
Just trying to get to grips with sed and awk for some reporting for work and I need some assistance:
I have a file that lists policy names on the first line and then on the second line whether the policy is active or not.
Policy Name: Policy1
Active: yes
Policy... (8 Replies)
version info :
vi availabe with RHEL 5.4
I have a text file with 10,000 lines. I want to copy lines from 5000th line to 7000th and redirect to a file. Any idea how I can do this?
Note:
The above scenario is just an example. In my actual requirement, the file has 14 million lines and I want... (9 Replies)
Hi everyone,
I know the following questions are noobish questions but I am asking them because I am confused about the basics of history behind UNIX and LINUX.
Ok onto business, my questions are-:
Was/Is UNIX ever an open source operating system ?
If UNIX was... (21 Replies)
Hello,
I couldn't find an actual introduction thread, so I decided to just put this here.
I go by d0wngrade online. I have been programming in multiple languages for about 15+ years. I started with standard web design languages like HTML and CSS, but I then advanced from design to development... (2 Replies)
Hi guys...
The first active code line in AudioScope.sh is set -u .
This causes a complete exit if a variable is used/found but has not been allocated at the start of the program.
However, apart from writing code to do the task, is there a switch to to check which variables have been... (17 Replies)
Hi.
In thread https://www.unix.com/shell-programming-and-scripting/267833-grouping-counting.html rovf and I had a mini-discussion on grep and awk.
Here is a demo script that compares the awk and grep approaches for this single problem:
#!/usr/bin/env bash
# @(#) s2 Demonstrate group... (1 Reply)
Hello,
I have to fish out some specific columns from a file based on the header value. I have the list of columns I need in a different file. I thought I could read in the list of headers I need,
# file with header names of required columns in required order
headers_file=$2
# read contents... (11 Replies)
For those interested in installing dash shell on OSX Lion to help test POSIX compliancy of shell scripts, it is quite easy. I did it like this:
If you don't have gcc on your system:
0. Download and install the Command Line Tools for Xcode package from Sign In - Apple *
1. Download the dash... (2 Replies)
Hello and thanks in advance for any help anyone can offer me
I'm trying to learn the find command and thought I was understanding it... Apparently I was wrong. I was doing compound searches and I started getting weird results with the -size test. I was trying to do a search on a 1G file owned by... (14 Replies)
I have data of an excel files as given below,
file1
org1_1 1 1 2.5 100
org1_2 1 2 5.5 98
org1_3 1 3 7.2 88
file2
org2_1 1 1 2.5 100
org2_2 1 2 5.5 56
org2_3 1 3 7.2 70
I have multiple excel files as above shown.
I have to copy column 1, column 4 and paste into a new excel file as... (26 Replies)
Dear All,
Taking a break from Vue.js coding for the site, SEO and YT videos; and hopefully addressing some well deserved criticism from some here that I have been too focused on the visual aspects of the forums versus the substance and the community....
While the "current generation... (9 Replies)
Hi all...
Well guys and gals, I jumped in at the deep end and found things that PERL cannot do by default.
Many tricky terminal escape codes are not catered for so I had to create workarounds.
One thing I searched for was this:
Passing perl variable to shell command
AND, @Neo this was... (15 Replies)