Login or Register to Ask a Question and Join Our Community


Shell Programming and Scripting

Grep three consecutive lines if each lines contains certain string

Login to Discuss or Reply to this Discussion in Our Community

 
Thread Tools Search this Thread
Top Forums Shell Programming and Scripting Grep three consecutive lines if each lines contains certain string
# 8  
Old 11-20-2015
if you are sure that it is impossible for either of REQUEST/RESPONSE/SUCCESS to appear more than once in terms of your key from column 1. Then below awk should work for you.

Code:
awk 'BEGIN{FS=" +| +"}
{
arr[$1]=arr[$1]"\n"$0
brr[$1]++
}
END{
for(i in arr)
if(brr[i]==3)
print arr[i]
}' a

python
Code:
import re
lines={}
actions={}
with open("a.txt") as file:
	for line in file:
		items=re.compile("\s+|\s+").split(line)
		if items[0] in lines:
			lines[items[0]]=lines[items[0]]+line
		else:
			lines[items[0]]=line
		if items[0] in actions:
			actions[items[0]]=actions[items[0]]+'_'+items[2]
		else:
			actions[items[0]]=items[2]
for key in lines:
	if 'REQUEST' in actions[key] and 'RESPONSE' in actions[key] and 'SUCCESS' in actions[key]:
		print(lines[key])
Login or Register to Ask a Question

Previous Thread | Next Thread

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Remove duplicate consecutive lines with specific string

Hello, I'm trying to remove the duplicate consecutive lines with specific string "WARNING". File.txt abc; WARNING 2345 WARNING 2345 WARNING 2345 WARNING 2345 WARNING 2345 bcd; abc; 123 123 123 WARNING 1234 WARNING 2345 WARNING 2345 efgh; (6 Replies)
Discussion started by: Mannu2525
6 Replies

2. Shell Programming and Scripting

Grep a string and count following lines starting with another string

I have a large dataset with following structure; C 0001 Carbon D SAR001 methane D SAR002 ethane D SAR003 propane D SAR004 butane D SAR005 pentane C 0002 Hydrogen C 0003 Nitrogen C 0004 Oxygen D SAR011 ozone D SAR012 super oxide C 0005 Sulphur D SAR013... (3 Replies)
Discussion started by: Syeda Sumayya
3 Replies

3. Shell Programming and Scripting

Grep 2 consecutive lines and replace the second line in a file

I have a file lake this cat ex1.txt </DISCOUNTS> <B2B_SPECIFICATION elem="0"> <B2B_SPECIFICATION elem="0"> <DESCR>Netti 2 </DESCR> <NUMBER>D02021507505</NUMBER> </B2B_SPECIFICATION> <B2B_SPECIFICATION elem="1"> <DESCR>Puhepaketti</DESCR>... (2 Replies)
Discussion started by: Dhoni
2 Replies

4. Shell Programming and Scripting

Grep couple of consecutive lines if each lines contains certain string

Hello, I want to extract from a file like : 20120530025502914 | REQUEST | whatever 20120530025502968 | RESPONSE | whatever 20120530025502985 | RESPONSE | whatever 20120530025502996 | REQUEST | whatever 20120530025503013 | REQUEST | whatever 20120530025503045 | RESPONSE | whatever I want... (14 Replies)
Discussion started by: black_fender
14 Replies

5. Shell Programming and Scripting

aix :grep to get lines before and after string

am using AIX and I have a string "There is no process to read data written to a pipe". I want to get the output 2 lines before and 4 lines after this string. The string is present like more than 100 times in the log and I want to output, the last result in the log with this string I tried using... (1 Reply)
Discussion started by: PhAnT0M
1 Replies

6. Shell Programming and Scripting

Grep a string from input file and delete next three lines including the line contains string in xml

Hi, 1_strings file contains $ cat 1_strings /home/$USER/Src /home/Valid /home/Review$ cat myxml <projected value="some string" path="/home/$USER/Src"> <input 1/> <estimate value/> <somestring/> </projected> <few more lines > <projected value="some string" path="/home/$USER/check">... (4 Replies)
Discussion started by: greet_sed
4 Replies

7. Shell Programming and Scripting

Merge two non-consecutive lines based on line number or string

This is a variation of an earlier post found here: unixcom/shell-programming-scripting/159821-merge-two-non-consecutive-lines.html User Bartus11 was kind enough to solve that example. Previously, I needed help combining two lines that are non-consecutive in a file. Now I need to do the... (7 Replies)
Discussion started by: munkee
7 Replies

8. Shell Programming and Scripting

Print lines between two lines after grep for a text string

I have several very large file that are extracts from Oracle tables. These files are formatted in XML type syntax with multiple entries like: <ROW> some information more information </ROW> I want to grep for some words, then print all lines between <ROW> AND </ROW>. Can this be done with AWK?... (7 Replies)
Discussion started by: jbruce
7 Replies

9. Shell Programming and Scripting

Like grep -v for a string over 2 lines? Sed?

Hi, I have a log file that I need to monitor as it's being written to, and I want to exclude certain strings from the output. At the moment I'm using ... tail -f LogFileName_`date +%d`.log | egrep -v "First String To Exclude | 2nd string | 3rd string" ...which works OK - but now I need to... (1 Reply)
Discussion started by: jake657
1 Replies

10. Shell Programming and Scripting

grep string & next n lines

need help on this. let say i hv 1 file contains as below: STRING Description bla bla bla Description yada yada yada Data bla bla Data yada yada how do i want to display n lines after the string? thanks in advance! (8 Replies)
Discussion started by: ashterix
8 Replies
Login or Register to Ask a Question

LEARN ABOUT DEBIAN

poe::filter::grep

POE::Filter::Grep(3pm)					User Contributed Perl Documentation				    POE::Filter::Grep(3pm)

NAME

       POE::Filter::Grep - select or remove items based on simple rules

SYNOPSIS

	 #!perl

	 use POE qw(
	   Wheel::FollowTail
	   Filter::Line Filter::Grep Filter::Stackable
	 );

	 POE::Session->create(
	   inline_states => {
	     _start => sub {
	       my $parse_input_as_lines = POE::Filter::Line->new();

	       my $select_sudo_log_lines = POE::Filter::Grep->new(
		 Put => sub { 1 },
		 Get => sub {
		   my $input = shift;
		   return $input =~ /sudo[d+]/i;
		 },
	       );

	       my $filter_stack = POE::Filter::Stackable->new(
		 Filters => [
		   $parse_input_as_lines, # first on get, last on put
		   $select_sudo_log_lines, # first on put, last on get
		 ]
	       );

	       $_[HEAP]{tailor} = POE::Wheel::FollowTail->new(
		 Filename => "/var/log/system.log",
		 InputEvent => "got_log_line",
		 Filter => $filter_stack,
	       );
	     },
	     got_log_line => sub {
	       print "Log: $_[ARG0]
";
	     }
	   }
	 );

	 POE::Kernel->run();
	 exit;

DESCRIPTION

       POE::Filter::Grep selects or removes items based on simple tests.  It may be used to filter input, output, or both.  This filter is named
       and modeled after Perl's built-in grep() function.

       POE::Filter::Grep is designed to be combined with other filters through POE::Filter::Stackable.	In the "SYNOPSIS" example, a filter stack
       is created to parse logs as lines and remove all entries that don't pertain to a sudo process.  (Or if your glass is half full, the stack
       only selects entries that DO mention sudo.)

PUBLIC FILTER METHODS

       In addition to the usual POE::Filter methods, POE::Filter::Grep also supports the following.

   new
       new() constructs a new POE::Filter::Grep object.  It must either be called with a single Code parameter, or both a Put and a Get parameter.
       The values for Code, Put, and Get are code references that, when invoked, return true to select an item or false to reject it.  A Code
       function will be used for both input and output, while Get and Put functions allow input and output to be filtered in different ways.  The
       item in question will be passed as the function's sole parameter.

	 sub reject_bidoofs {
	   my $pokemon = shift;
	   return 1 if $pokemon ne "bidoof";
	   return;
	 }

	 my $gotta_catch_nearly_all = POE::Filter::Grep->new(
	   Code => &reject_bidoofs,
	 );

       Enforce read-only behavior:

	 my $read_only = POE::Filter::Grep->new(
	   Get => sub { 1 },
	   Put => sub { 0 },
	 );

   modify
       modify() changes a POE::Filter::Grep object's behavior at run-time.  It accepts the same parameters as new(), and it replaces the existing
       tests with new ones.

	 # Don't give away our Dialgas.
	 $gotta_catch_nearly_all->modify(
	   Get => sub { 1 },
	   Put => sub { return shift() ne "dialga" },
	 );

SEE ALSO

       POE::Filter for more information about filters in general.

       POE::Filter::Stackable for more details on stacking filters.

BUGS

       None known.

AUTHORS &; COPYRIGHTS
       The Grep filter was contributed by Dieter Pearcey.  Documentation is provided by Rocco Caputo.

       Please see the POE manpage for more information about authors and contributors.

perl v5.14.2							    2012-05-15						    POE::Filter::Grep(3pm)