Shell Programming and Scripting

I have a log file from which I want to cut out the ten lines assoictiated to my search requirment (cust_ref #).

The cust_ref number will be on te first line and the update information will be on the following ten lines (which dosen't linking data to grep on).

Using a script I would like to search to the cust_ref and cut the 11 lines I need.

Columns, characters I can cut but don't know where to start on cutting whole lines!!!!

Any usefull tips?

Any Fanks,

Neil

Hi,

Can you give an example of the file format?

Cheers
Helen

This is an example, would take too longto remove customer details.


2003-09-04 12:20:00 INFO [CUST_REF ] blah blah
2003-09-04 12:20:00 INFO [ John ] blah blah
2003-09-04 12:20:00 INFO [ Doe ] bah blah blah
2003-09-04 12:20:00 INFO [ Gender ]
2003-09-04 12:20:00 INFO [ DOB ]
2003-09-04 12:20:00 INFO [ Postal code ]
2003-09-04 12:20:00 INFO [ Limit 100 ] blah blah
2003-09-04 12:20:00 INFO [ API Value ]
2003-09-04 12:20:00 ERROR [ Error Element ]
2003-09-04 12:20:00 INFO [ Record num ]
2003-09-04 12:20:00 INFO [ status ]
several line of mixed information lines before the next lot of details.

Each lot of details in the square brackets will be different, the x number lines after the CUST_REF will be for that customer. The date/time stirng is not an option because you get more than one customer load in the same second and I don't nesacery want all customers. Just the ones I specify.

Try this:

sed -n '/CUST_REF/{N;N;N;N;N;N;N;N;N;N;p;}' < your_file

I like oombera's sed solution, but I wouldn't have chosen sed because it's a bit mysterious to me. Here's an awk solution.

Code:

awk '/CUST_REF/ { i = 11 } i-- > 0' < your_file

When "CUST_REF" is seen on a line, a counter is set for 11 lines. The next pattern selects all lines for which the counter is bigger than 1 and decrements the counter (after the comparison is made --- this is important), but because there is no action associated with it, the default action of "print the current line" is taken.

The perl is similar:

Code:

perl -lne '$i = 11 if /CUST_REF/; print if $i-- > 0' < your_file

The perl has the advantage of not having a line length limit (which may not affect your case).