Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: How to find a string in a line in UNIX file and delete that line and previous 3 lines ?
Top Forums UNIX for Advanced & Expert Users How to find a string in a line in UNIX file and delete that line and previous 3 lines ? Post 302901927 by alister on Friday 16th of May 2014 12:48:09 PM
Old 05-16-2014
Quote:
Originally Posted by Perderabo
Here is another solution:
Code:
#! /bin/bash


awk ' BEGIN {i=0;}
        /Field 039 00/ { count = 0 ; next}
        {
        Store[i]=$0;
...

It did not work until I put in the BEGIN block. I have to say I don't understand why. I expected i to just pop into existence with a value of 0. Maybe that doesn't work with subscripts.
AWK's arrays are associative and its subscripts are strings. i does pop into existence, but, in that string context, its undefined value is converted to an empty string.
Code:
awk 'BEGIN { a[i]=5; print "ZERO: " a[0]; print "EMPTY: " a[""]}'
ZERO: 
EMPTY: 5

An alternative fix would be to cast i to a numeric, Store[i+0]=$0, before AWK automatically casts it back to a string (technically there is no cast, as the variable can have both string and numeric values at the same time and the implementation simply chooses which to use depending on context).

Regards,
Alister
This User Gave Thanks to alister For This Post:
Perderabo
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

find previous line, next line on solaris

Hi, Unlike the GNU version, grep on SunOS doesn't have the switches -B and -A to fetch me the lines before n after the match and looking for an alternate way. Any Suggestions?. -Anduzzi (1 Reply)
Discussion started by: anduzzi
1 Replies

2. Shell Programming and Scripting

How to use sed to search for string and Print previous two lines and current line

Hello, Can anybody help me to correct my sed syntax to find the string and print previous two lines and current line and next one line. i am using string as "testing" netstat -v | sed -n -e '/test/{x;2!p;g;$!N;p;D;}' -e h i am able to get the previous line current line next line but... (1 Reply)
Discussion started by: nmadhuhb
1 Replies

3. Shell Programming and Scripting

Unix help to find blank lines in a file and print numbers on that line

Hi, I would like to know how to solve one of my problems using expert unix commands. I have a file with occasional blank lines; for example; dertu frthu fghtu frtty frtgy frgtui frgtu ghrye frhutp frjuf I need to edit the file so that the file looks like this; (10 Replies)
Discussion started by: Lucky Ali
10 Replies

4. Shell Programming and Scripting

Find pattern a delete previous 5 lines

Hi guys, i have the follow problem i need to delete 10 row before the pattern and 1 after and the pattern row itself. file looks like: frect 9.8438 25.8681 10.625 25 . dynprop \ (# \ (call fox_execute(__self))) \ (FOX_VAR_29 \ ... (4 Replies)
Discussion started by: EjjE
4 Replies

5. 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

6. Shell Programming and Scripting

Delete line with match and previous line quoting/escaping problem

Hi folks, I've list of LDAP records in this format: cat cmmac.export.tmp2 dn: deviceId=0a92746a54tbmd34b05758900131136a506,ou=devices,ou=customer,ou=nl,o=upc cmmac: 00:13:11:36:a5:06 dn: deviceId=0a92746a62pbms4662299650015961cfa23,ou=devices,ou=customer,ou=nl,o=upc cmmac:... (4 Replies)
Discussion started by: tomas.polak
4 Replies

7. Shell Programming and Scripting

Sed find exact string and delete line with variable

All, I am trying to read in a variable and search a file then delete based on that string, but i want to match exact word. This works but it matches all, i don't want to match anthing that contains the string, just the exact string. sed -i "/$feedname/d" file I tried sed... (1 Reply)
Discussion started by: markdjones82
1 Replies

8. Shell Programming and Scripting

Remove previous line if next & previous lines have same 4th character.

I want to remove commands having no output. In below text file. bash-3.2$ cat abc_do_it.txt grpg10so>show trunk group all status grpg11so>show trunk group all status grpg12so>show trunk group all status GCPKNYAIGT73IMO 1440 1345 0 0 94 0 0 INSERVICE 93% 0%... (4 Replies)
Discussion started by: Raza Ali
4 Replies

9. Shell Programming and Scripting

Delete all lines except a line starting with string

Shell : bash OS : RHEL 6.8 I have a file like below. $ cat pattern.txt hello txt1 txt2 txt3 some other text txt4 I want to remove all lines in this file except the ones starting with txt . How can I do this ? (4 Replies)
Discussion started by: omega3
4 Replies

10. Shell Programming and Scripting

How to find string and delete before just in line?

Hello, When my lines contain question mark, I use below command to delete the portion of the matching line coming after question mark: sed 's/?.*//' SampleFile SampleFile: helloworldfirstline?mdksmyymsss hellosecondlineworld?mdksmkkmsss thirdhelloworld?mdksmccmsss Output:... (2 Replies)
Discussion started by: baris35
2 Replies

LEARN ABOUT DEBIAN

plucene::document::field

Plucene::Document::Field(3pm)				User Contributed Perl Documentation			     Plucene::Document::Field(3pm)

NAME

       Plucene::Document::Field - A field in a Plucene::Document

SYNOPSIS

	       my $field = Plucene::Document::Field->Keyword($name, $string);
	       my $field = Plucene::Document::Field->Text($name, $string);

	       my $field = Plucene::Document::Field->UnIndexded($name, $string);
	       my $field = Plucene::Document::Field->UnStored($name, $string);

DESCRIPTION

       Each Plucene::Document is made up of Plucene::Document::Field objects. Each of these fields can be stored, indexed or tokenised.

FIELDS

   name
       Returns the name of the field.

   string
       Returns the value of the field.

   is_stored
       Returns true if the field is or will be stored, or false if it was created with "UnStored".

   is_indexed
       Returns true if the field is or will be indexed, or false if it was created with "UnIndexed".

   is_tokenized
       Returns true if the field is or will be tokenized, or false if it was created with "UnIndexed" or "Keyword".

METHODS

   Keyword
	       my $field = Plucene::Document::Field->Keyword($name, $string);

       This will make a new Plucene::Document::Field object that is stored and indexed, but not tokenised.

   UnIndexed
	       my $field = Plucene::Document::Field->UnIndexded($name, $string);

       This will make a new Plucene::Document::Field object that is stored, but not indexed or tokenised.

   Text
	       my $field = Plucene::Document::Field->Text($name, $string);

       This will make a new Plucene::Document::Field object that is stored, indexed and tokenised.

   UnStored
	       my $field = Plucene::Document::Field->UnStored($name, $string);

       This will make a new Plucene::Document::Field object that isn't stored, but is indexed and tokenised.

perl v5.12.4							    2011-08-14					     Plucene::Document::Field(3pm)
All times are GMT -4. The time now is 02:07 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy