Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: Find matched pattern and print all based on certain conditions
Top Forums UNIX for Beginners Questions & Answers Find matched pattern and print all based on certain conditions Post 303041551 by bunny_merah19 on Wednesday 27th of November 2019 07:25:36 PM
Old 11-27-2019
Quote:
Originally Posted by RudiC
Well, looks like any tra_law line should reset the counters, regardless of the $5 - $4 delta value. Try this small adaption.



Code:
awk -F"\t" '
NR > 2           &&
$3 ~ /tra_law/  {if ((CNT > 3) && (DELTA > 200)) print substr (OUT, 2)
                 DELTA = $5 - $4
                 SRC = $1
                 OUT = ""
                 CNT = 0
                }
$1 == SRC       {OUT = OUT ORS $0 
                 CNT ++
                }
END             {if  ((CNT > 3) && (DELTA > 200))  print substr (OUT, 2)
                }

 ' file

Your new file seems to have multiple <TAB> chars as field separators?

Hi RudiC,


The multiple <TAB> chars were my typo mistakes. Sorry about that.

It worked now. Thanks a million. I am trying to understand your codes especially the "OUT" part. If you don't mind, can you pls help explain about it. thanks
Last edited by bunny_merah19; 11-27-2019 at 09:49 PM..
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

appending with sed based on matched pattern

Hi, I want to know if you can input with sed but instead of specifing a line number like below I wan't to be able to insert based on a specific word or patttern. 10i\ Insert me after line 10 is this possible with sed or should I use AWK? Thanks Jack (2 Replies)
Discussion started by: jack1981
2 Replies

2. Shell Programming and Scripting

SED: delete and print the only exact matched pattern

I am really need help with the regular expression in SED. From input file, I need to extract lines that have the port number (sport or dport) as defined. The input file is something like this time=1209515280-1209515340 dst=192.168.133.202 src=208.70.8.23 bytes=2472 proto=6 sport=80 dport=1447... (6 Replies)
Discussion started by: new_buddy
6 Replies

3. Shell Programming and Scripting

print last matched pattern using perl

Hi, If there exist multiple pattern in a file, how can I find the last record matching the pattern through perl. The below script searches for the pattern everywhere in an input file. #! /usr/bin/perl -s -wnl BEGIN { $pattern or warn"Usage: $0 -pattern='RE' \n" and exit 255;... (5 Replies)
Discussion started by: er_ashu
5 Replies

4. UNIX for Dummies Questions & Answers

Lynx Grep Pattern Match 2 conditions Print from Start to End

I am working on a scraping project and I am stuck at this tiny grep pattern match. Sample text : FPA List. FPA List. FPA List. FPA List. FPA List. FPA List. FPA List. FPA List. ABC Personal Planning Catherine K. Wat Cath Wat Catherine K. Wat Catherine K. Wat IFRAME:... (8 Replies)
Discussion started by: kkiran
8 Replies

5. Linux

Perl program to print previous set of lines once a pattern is matched

Hi all, I have a text data file. My aim here is to find line called *FIELD* AV for every record and print lines after that till *FIELD* RF. But here I want first 3 to four lines for very record as well. FIELD AV is some where in between for very record. SO I am not sure how to retrieve lines in... (2 Replies)
Discussion started by: kaav06
2 Replies

6. Shell Programming and Scripting

print the whole row in awk based on matched pattern

Hi, I need some help on how to print the whole data for unmatched pattern. i have 2 different files that need to be checked and print out the unmatched patterns into a new file. My sample data as follows:- File1.txt Id Num Activity Class Type 309 1.1 ... (5 Replies)
Discussion started by: redse171
5 Replies

7. Shell Programming and Scripting

Print only matched pattern in perl

Hi, I have script like below: #!/usr/local/bin/perl use strict; use warnings; while (<DATA>) { ( my ($s_id) = /^\d+\|(\d+?)\|/ ) ; if ( $s_id == 1 ){ s/^(.*\|)*.*ABC\.pi=(+|+)*.*ABC\.id=(\d+|+).*$/$1$2|$3/s; print "$1$2|$3\n"; (2 Replies)
Discussion started by: sol_nov
2 Replies

8. Shell Programming and Scripting

Print line between two patterns when a certain pattern matched

Hello Friends, I need to print lines in between two string when a keyword existed in those lines (keywords like exception, error, failed, not started etc). for example, input: .. Begin Edr ab12 ac13 ad14 bc23 exception occured bd24 cd34 dd44 ee55 ff66 End Edr (2 Replies)
Discussion started by: EAGL€
2 Replies

9. Shell Programming and Scripting

Regex: print matched line and exact pattern match

Hi experts, I have a file with regexes which is used for automatic searches on several files (40+ GB). To do some postprocessing with the grep result I need the matching line as well as the match itself. I know that the latter could be achieved with grep's -o option. But I'm not aware of a... (2 Replies)
Discussion started by: stresing
2 Replies

10. UNIX for Advanced & Expert Users

To print from the first line until pattern is matched

Hi I want to print the line until pattern is matched. I am using below code: sed -n '1,/pattern / p' file It is working fine for me , but its not working for exact match. sed -n '1,/^LAC$/ p' file Input: LACC FEGHRA 0 LACC FACAF 0 LACC DARA 0 LACC TALAC 0 LAC ILACTC 0... (8 Replies)
Discussion started by: Abhisrajput
8 Replies

LEARN ABOUT DEBIAN

slaed5.f

slaed5.f(3)							      LAPACK							       slaed5.f(3)

NAME

       slaed5.f -

SYNOPSIS

   Functions/Subroutines
       subroutine slaed5 (I, D, Z, DELTA, RHO, DLAM)
	   SLAED5

Function/Subroutine Documentation
   subroutine slaed5 (integerI, real, dimension( 2 )D, real, dimension( 2 )Z, real, dimension( 2 )DELTA, realRHO, realDLAM)
       SLAED5

       Purpose:

	    This subroutine computes the I-th eigenvalue of a symmetric rank-one
	    modification of a 2-by-2 diagonal matrix

		       diag( D )  +  RHO * Z * transpose(Z) .

	    The diagonal elements in the array D are assumed to satisfy

		       D(i) < D(j)  for  i < j .

	    We also assume RHO > 0 and that the Euclidean norm of the vector
	    Z is one.

       Parameters:
	   I

		     I is INTEGER
		    The index of the eigenvalue to be computed.  I = 1 or I = 2.

	   D

		     D is REAL array, dimension (2)
		    The original eigenvalues.  We assume D(1) < D(2).

	   Z

		     Z is REAL array, dimension (2)
		    The components of the updating vector.

	   DELTA

		     DELTA is REAL array, dimension (2)
		    The vector DELTA contains the information necessary
		    to construct the eigenvectors.

	   RHO

		     RHO is REAL
		    The scalar in the symmetric updating formula.

	   DLAM

		     DLAM is REAL
		    The computed lambda_I, the I-th updated eigenvalue.

       Author:
	   Univ. of Tennessee

	   Univ. of California Berkeley

	   Univ. of Colorado Denver

	   NAG Ltd.

       Date:
	   November 2011

       Contributors:
	   Ren-Cang Li, Computer Science Division, University of California at Berkeley, USA

       Definition at line 109 of file slaed5.f.

Author
       Generated automatically by Doxygen for LAPACK from the source code.

Version 3.4.1							  Sun May 26 2013						       slaed5.f(3)
All times are GMT -4. The time now is 12:05 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy