01-16-2008
This may help get you started:
BEFORE:
cat file-1.txt
# Start
"ABC" SFFd 0 4 [abc]
Time SFFT 4 8 {Sec} [abc]
User SFFTimeVal 12 8 {Sec} [asd]
AFTER:
cat file-1.txt | grep -v ^# | sed -e 's/"//g' | awk '{print $1","$2",sec"}'
ABC,SFFd,sec
Time,SFFT,sec
User,SFFTimeVal,sec
10 More Discussions You Might Find Interesting
1. Tips and Tutorials
A common thing in shell scripting. I came across this script that will be useful for people learning to write script.
#!/usr/bin/ksh
#
# SCRIPT: 12_ways_to_parse.ksh.ksh
#
#
# REV: 1.2.A
#
# PURPOSE: This script shows the different ways of reading
# a file line by line. Again... (0 Replies)
Discussion started by: google
0 Replies
2. Shell Programming and Scripting
Hi Friends,
I have a file in the format shown (Name followed by address:)
I need only the address part please see the output.
I have tried using nawk but I am not getting the desired output.
SAM
ADDRS 64874 FRANKLYN DR
IRVINE TX - 74394;
538 FRED ASSOCIATES
PETER
ADDRS 84734... (5 Replies)
Discussion started by: sbasetty
5 Replies
3. UNIX for Advanced & Expert Users
I have one file say CM.txt which contains values like below.Its just a flat file
1000,A,X
1001,B,Y
1002,B,Z
...
..
total around 4 million lines of entries will be in that file.
Now i need to write another file CM1.txt which should have
1000,1
1001,2
1002,3
....
...
..
Here i... (6 Replies)
Discussion started by: sivasu.india
6 Replies
4. Shell Programming and Scripting
Hi
I need to parse the file of same name which exist on different servers and calculate the count of string existed in both files.
Say a file abc.log exist on 2 servers.
I want to search for string "test" on both files and calculate the total count of search string's existence.
For... (6 Replies)
Discussion started by: poweroflinux
6 Replies
5. Shell Programming and Scripting
Hi I have the following as input
/* ----------------- backupJIL ----------------- */
insert_job: backupJIL job_type: c
command: autorep -J ALL -q > /home/autosys/...p/autosys_jil_bk
machine: machine
owner: autosys@machine
permission: gx,ge,wx,we
date_conditions: 1
days_of_week:... (7 Replies)
Discussion started by: ramky79
7 Replies
6. Shell Programming and Scripting
FILE1
2917,065A,RDF1+TDEV,2917_3RAID5,05E:0_10E:0,BL_lmwsp02,0345,xxx,3452(DR)
2917,03EA,RDF1+TDEV,2917_3RAID5,03E:0_12E:0,BL_tv00p02,0455,xxx,3ee4(DR)
2917,03EB,RDF1+TDEV,2917_3RAID5,03E:0_12E:0,BL_tv00p02,0345,xxx,2d34(DR)... (7 Replies)
Discussion started by: greycells
7 Replies
7. Shell Programming and Scripting
trying to parse out all parts of this file name.
REC=`echo "CAMXI.F0150.txt" | sed 's/.*\(*\).*/\1/'`
export "FLRECL=$REC"
FLECL=0150
I can get the numbers 0150 out of the file name. But need to capture first 5 bytes and extension. So i would export 3 variables (name, length, extension)... (5 Replies)
Discussion started by: rapalanlord
5 Replies
8. Shell Programming and Scripting
Hello,
A bioperl problem I thought could be done with awk: convert the fasta format (Note: the length of each row is not the same for each entry as they were combined from different files!) to tabular format.
input.fasta:
>YAL069W-1.334 Putative promoter sequence... (6 Replies)
Discussion started by: yifangt
6 Replies
9. Shell Programming and Scripting
Hi Experts,
I am trying to parse the following file;
FILEA
a|b|c|c|c|c
a|b|d|d|d|d
e|f|a|a|a|a
e|f|b|b|b|boutput expected:
a<TAB>b
<TAB><TAB>c<TAB>c<TAB>c<TAB>c<TAB>
<TAB><TAB>d<TAB>d<TAB>d<TAB>d<TAB>
e<TAB>f
<TAB><TAB>a<TAB>a<TAB>a<TAB>a<TAB>
<TAB><TAB>b<TAB>b<TAB>b<TAB>b<TAB>*... (7 Replies)
Discussion started by: rajangupta2387
7 Replies
10. Shell Programming and Scripting
Hi guys
I have a very long file which looks like this:
y893
89:send prctmgr exit
106:bas_services_dwn
--------------------------------------------------
y895
90:send prctmgr exit
106:bas_services_dwn
--------------------------------------------------
y897
90:send prctmgr exit... (3 Replies)
Discussion started by: aoussenko
3 Replies
LEARN ABOUT DEBIAN
time::julianday
Time::JulianDay(3pm) User Contributed Perl Documentation Time::JulianDay(3pm)
NAME
Time::JulianDay -- Julian calendar manipulations
SYNOPSIS
use Time::JulianDay
$jd = julian_day($year, $month_1_to_12, $day)
$jd = local_julian_day($seconds_since_1970);
$jd = gm_julian_day($seconds_since_1970);
($year, $month_1_to_12, $day) = inverse_julian_day($jd)
$dow = day_of_week($jd)
print (Sun,Mon,Tue,Wed,Thu,Fri,Sat)[$dow];
$seconds_since_jan_1_1970 = jd_secondslocal($jd, $hour, $min, $sec)
$seconds_since_jan_1_1970 = jd_secondsgm($jd, $hour, $min, $sec)
$seconds_since_jan_1_1970 = jd_timelocal($sec,$min,$hours,$mday,$month_0_to_11,$year)
$seconds_since_jan_1_1970 = jd_timegm($sec,$min,$hours,$mday,$month_0_to_11,$year)
DESCRIPTION
JulianDay is a package that manipulates dates as number of days since some time a long time ago. It's easy to add and subtract time using
julian days...
The day_of_week returned by day_of_week() is 0 for Sunday, and 6 for Saturday and everything else is in between.
ERRATA
Time::JulianDay is not a correct implementation. There are two problems. The first problem is that Time::JulianDay only works with
integers. Julian Day can be fractional to represent time within a day. If you call inverse_julian_day() with a non-integer time, it will
often give you an incorrect result.
The second problem is that Julian Days start at noon rather than midnight. The julian_day() function returns results that are too large by
0.5.
What to do about these problems is currently open for debate. I'm tempted to leave the current functions alone and add a second set with
more accurate behavior.
There is another implementation in Astro::Time that may be more accurate.
GENESIS
Written by David Muir Sharnoff <cpan@dave.sharnoff.org> with help from previous work by Kurt Jaeger aka PI
<zrzr0111@helpdesk.rus.uni-stuttgart.de>
based on postings from: Ian Miller <ian_m@cix.compulink.co.uk>; Gary Puckering <garyp%cognos.uucp@uunet.uu.net> based on
Collected Algorithms of the ACM ?; and the unknown-to-me author of Time::Local.
LICENSE
Copyright (C) 1996-1999 David Muir Sharnoff. License hereby granted for anyone to use, modify or redistribute this module at their own
risk. Please feed useful changes back to cpan@dave.sharnoff.org.
perl v5.12.3 2011-05-06 Time::JulianDay(3pm)