Sponsored Content
Top Forums Shell Programming and Scripting Script to find string based on pattern and search for its corresponding rows in column Post 303037207 by Chubler_XL on Thursday 25th of July 2019 04:14:58 PM
Old 07-25-2019
You should store all the $2 values that match as a CSV in assoc. Then use a recursive function to walk thru assoc for each match:

Code:
awk -F, '
function prn_assoc(val,cnt,newvals)
{
   if(val in seen) return
   seen[val]
   printf ",%s",val
   split(assoc[val], newvals)
   for(cnt in newvals)
       prn_assoc(newvals[cnt])
}
NR==FNR{
    if($1 in assoc)
       assoc[$1]=assoc[$1] FS $2
    else assoc[$1]=$2
    next
}
$1~"9K" {
   printf "%s", $1
   split("", seen)
   seen[$1]
   prn_assoc($2)
   printf "\n"
}' inputfile.csv inputfile.csv > output.csv


Last edited by Chubler_XL; 07-25-2019 at 05:34 PM.. Reason: simplify prn_assoc() and ensure $1 populated in seen[]
This User Gave Thanks to Chubler_XL For This Post:
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Script to find the average of a given column and also for specified number of rows??

Hi friends I have 100 files in my directory. Each file look like this.. Temp1 Temp2 Temp3 MAS 1 2 3 MAS 4 5 6 MAS 7 8 9 Delhi 10 11 12 Delhi 13 14 15 Delhi 16 17 ... (4 Replies)
Discussion started by: ks_reddy
4 Replies

2. Shell Programming and Scripting

Script to find the average of a given column and also for specified number of rows?

Hi Friends, In continuation to my earlier post https://www.unix.com/shell-programming-scripting/99166-script-find-average-given-column-also-specified-number-rows.html I am extending my problem as follows. Input: Column1 Column2 MAS 1 MAS 4 ... (2 Replies)
Discussion started by: ks_reddy
2 Replies

3. Shell Programming and Scripting

Print a pattern between the xml tags based on a search pattern

Hi all, I am trying to extract the values ( text between the xml tags) based on the Order Number. here is the sample input <?xml version="1.0" encoding="UTF-8"?> <NJCustomer> <Header> <MessageIdentifier>Y504173382</MessageIdentifier> ... (13 Replies)
Discussion started by: oky
13 Replies

4. Shell Programming and Scripting

need to remove duplicates based on key in first column and pattern in last column

Given a file such as this I need to remove the duplicates. 00060011 PAUL BOWSTEIN ad_waq3_921_20100826_010517.txt 00060011 PAUL BOWSTEIN ad_waq3_921_20100827_010528.txt 0624-01 RUT CORPORATION ad_sade3_10_20100827_010528.txt 0624-01 RUT CORPORATION ... (13 Replies)
Discussion started by: script_op2a
13 Replies

5. Shell Programming and Scripting

bash script to find date based on search string for continuesly updating file

Hi All, I am very new to UNIX and I have tried this for a longtime now and unable to crack it.... There is a file that is continuously updating. I need to search for the string and find the date @ which it updated every day..... eg: String is "work started" The log entry is as below: ... (1 Reply)
Discussion started by: Nithz
1 Replies

6. Shell Programming and Scripting

sed or awk command to replace a string pattern with another string based on position of this string

here is what i want to achieve... consider a file contains below contents. the file size is large about 60mb cat dump.sql INSERT INTO `table1` (`id`, `action`, `date`, `descrip`, `lastModified`) VALUES (1,'Change','2011-05-05 00:00:00','Account Updated','2012-02-10... (10 Replies)
Discussion started by: vivek d r
10 Replies

7. Shell Programming and Scripting

Find and copy files based on todays date and search for a particular string

Hi All, I am new to shell srcipting. Problem : I need to write a script which copy the log files from /prod/logs directory based on todays date like (Jul 17) and place it to /home/hzjnr0 directory and then search the copied logfiles for the string "@ending successfully on Thu Jul 17". If... (2 Replies)
Discussion started by: mail.chiranjit
2 Replies

8. UNIX for Dummies Questions & Answers

merging rows into new file based on rows and first column

I have 2 files, file01= 7 columns, row unknown (but few) file02= 7 columns, row unknown (but many) now I want to create an output with the first field that is shared in both of them and then subtract the results from the rest of the fields and print there e.g. file 01 James|0|50|25|10|50|30... (1 Reply)
Discussion started by: A-V
1 Replies

9. Shell Programming and Scripting

How can I use find command to search string/pattern in a file recursively?

Hi, How can I use find command to search string/pattern in a file recursively? What I tried: find . -type f -exec cat {} | grep "make" \; Output: grep: find: ;: No such file or directory missing argument to `-exec' And this: find . -type f -exec cat {} \; -exec grep "make" {} \;... (12 Replies)
Discussion started by: cola
12 Replies

10. UNIX for Beginners Questions & Answers

Merging rows based on same ID in First column.

Hellow, I have a tab-delimited file with 3 columns : BINPACKER.13259.1.p2 SSF48239 BINPACKER.13259.1.p2 PF13243 BINPACKER.13259.1.p2 G3DSA:1.50.10.20 BINPACKER.13259.2.p2 SSF48239 BINPACKER.13259.2.p2 PF13243 BINPACKER.13259.2.p2 G3DSA:1.50.10.20... (7 Replies)
Discussion started by: anjaliANJALI
7 Replies
GO::Model::Association(3pm)				User Contributed Perl Documentation			       GO::Model::Association(3pm)

NAME
GO::Model::Association - association between a GO term and a gene product SYNOPSIS
# print all gene products associated with a GO::Model::Term my $assoc_l = $term->association_list; foreach my $assoc (@$assoc_l) { printf "gene product:%s %s %s (evidence: %s) ", $assoc->gene_product->symbol, $assoc->is_not ? "IS NOT" : "IS", $term->name, map {$_->code} @{$assoc->evidence_list}; } DESCRIPTION
Represents an association between a GO term (GO::Model::Term) and a gene product (GO::Model::GeneProduct) go_public_acc Usage - Returns - Args - add_evidence Usage - $assoc->add_evidence($my_evid); Returns - Args - GO::Model::Evidence evidence_list Usage - my $ev_l = $assoc->evidence_list; Returns - Args - gets/sets arrayref of GO::Model::Evidence evidence_as_str Usage - print $assoc->evidence_as_str Usage - print $assoc->evidence_as_str(1); #verbose Returns - Args - verbose concatenates evcodes together, for display has_evcode Usage - if $assoc->has_evcode("IEA"); Returns - boolean Args - evcode [string] remove_evcode Usage - $assoc->remove_evcode("IEA"); Returns - Args - evcode [string] removes all evidence of the specified type from the association; useful for filtering evidence_score Usage - my $score = $assoc->evidence_score Returns - 0 <= float <= 1 Args - returns a score for the association based on the evidence; This is an EXPERIMENTAL method; it may be removed in future versions. The evidence fields can be thought of in a loose hierachy: TAS IDA IMP/IGI/IPI ISS NAS see http://www.geneontology.org/GO.evidence.html gene_product Usage - my $gp = $assoc->gene_product Returns - Args - gets sets GO::Model::GeneProduct assigned_by Usage - Returns - Args - is_not Usage - Returns - Args - gets/sets boolean representing whether this relationship is negated assocdate Usage - Returns - Args - assocdate Usage - Returns - Args - gets/sets integer representing the date of the association (YYYYMMDD format) role_group Usage - Returns - Args - gets/sets integer to indicate which associations go together perl v5.14.2 2013-02-07 GO::Model::Association(3pm)
All times are GMT -4. The time now is 06:49 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy