Hi forum members. It has been several years since my last post. Currently I am using fairly large datasets on a day to day basis for handling immigration cases at a law firm. Our Input file is filled out by our secretary staff. The first column is the case ID-sample ID then the second column is the sample ID, third is the relationship status and the fourth is the name.
What I need is a output file where the father (or mother) is compared to the child (daughter or son) so that the output file would be in rows with a specific syntax (please see the output file).
The file is tab seperated
Father and mother would be compared to all children (child, son and daughter)
If it is a son then a M would be used (e.g. ...[Jim Smith][M])
If it is a daughter then a F would be used (e.g.....[Jane Smith][F])
If the name is a child in the third column then it would be left blank (e.g..... [Randy Davis][])
Sometimes the list can have more than one child (e.g. up to 8 children) so then the father would have to be compared to all children in the output format.
Input file
Output file
Above is the output file. It would be best if the script is in perl however any code would help.
THanks
Last edited by kylle345; 09-20-2015 at 10:02 AM..
Reason: forgot to add more detail
Hi,
I have written a perl script to dispaly some statements from a file but i want the output statements to be dispalyed in an HTML format.Is it possible for me to do in perl scripting?
Please help me with ur thoughts.
Thanks In Advance
Meva. (1 Reply)
Hi everyone, is there any way in perl using which we can print the selective words in bold when we write the output to a csv file?
Please find the example below
1. Filename: A
2. name age 12
3. city add 23
Line1 should only be bold. Outputs from other files being read in the... (2 Replies)
Hi,
I am having couple of files which i used to copy from windows to Linux, so now in case of text files (CTRL^M) appears at end of line. I know i can convert this windows format file to unix format file by running dos2unix.
My requirement here is that i want to do it automatically using a... (5 Replies)
Hi,
i need a perl script which reads the file, content is given below. and output in new file.
TARGET DRIVE IO1 IO2 IO3 IO4 IO5
------------ --------- --------- --------- --------- ---------
0a.1.8 266 236 ... (3 Replies)
Input_file_1:
ABC1 DEF11
ABC3 DEF7
ABC7 DEF36
Input_file_2:
DEF7 light 23
DEF11 over 2
DEF11 over 1
DEF17 blue 0
Perl one-liner that join two input file based on columns sharing a value (In this example, column 2 in Input_file_1 and column 1 in... (3 Replies)
Hello,
I need help with a perl script that will process a text file and match virtual server name to profile(s). the rest will be ignored.
Virtual server name follows the word "virtual" in the begging of the line.
There could be multiple profiles assigned to one virtual server.
For example, ... (3 Replies)
Hi Folks,
I have few mailids in a text file and need to check whether the mailid is in correct format or not.
If just to check whether the string is a mailid or not there is a perl module Email::Valid to do the business or we can implement our own logic.
But the mail_ids I am having is... (4 Replies)
Hi,
I have a file with data in the following format
BOX
-1.000000 -1.000000 0.000000
30.00000 14.00000 0.1000000
0.000000 0.000000 0.000000
0.000000
0.000000
CYLINDER
3.595000 2.995000 0.000000
0.5100000 2.000000
Z
0.000000 0.000000
0.000000
I want to convert these files... (1 Reply)
Hi ,
i am generating some data by firing sql query with connecting to the database by my solaris box.
The below one should be the header line of my excel ,here its coming in separate row.
TO_CHAR(C. CURR_EMP_NO
---------- ---------------
LST_NM... (6 Replies)
Hello, I need to get few values from a XML file and output needs to be written in another file with pipe delimited format. The Header & Footer of the Pipe Delimited file will be constant.
The below is my sample XML file. I need to pull the values in between the XML tags <Operator_info to... (15 Replies)
Discussion started by: karthi1305561
15 Replies
LEARN ABOUT DEBIAN
datetime::leapsecond
DateTime::LeapSecond(3pm) User Contributed Perl Documentation DateTime::LeapSecond(3pm)NAME
DateTime::LeapSecond - leap seconds table and utilities
VERSION
version 0.75
SYNOPSIS
use DateTime;
use DateTime::LeapSecond;
print "Leap seconds between years 1990 and 2000 are ";
print DateTime::Leapsecond::leap_seconds( $utc_rd_2000 ) -
DateTime::Leapsecond::leap_seconds( $utc_rd_1990 );
DESCRIPTION
This module is used to calculate leap seconds for a given Rata Die day. It is used when DateTime.pm cannot compile the XS version of this
code.
This library is known to be accurate for dates until December 2009.
There are no leap seconds before 1972, because that's the year this system was implemented.
o leap_seconds( $rd )
Returns the number of accumulated leap seconds for a given day, in the range 0 .. 22.
o extra_seconds( $rd )
Returns the number of leap seconds for a given day, in the range -2 .. 2.
o day_length( $rd )
Returns the number of seconds for a given day, in the range 86398 .. 86402.
SEE ALSO
<http://hpiers.obspm.fr/eop-pc/earthor/utc/leapsecond.html>
http://datetime.perl.org
AUTHOR
Dave Rolsky <autarch@urth.org>
COPYRIGHT AND LICENSE
This software is Copyright (c) 2012 by Dave Rolsky.
This is free software, licensed under:
The Artistic License 2.0 (GPL Compatible)
perl v5.14.2 2012-06-11 DateTime::LeapSecond(3pm)