Sponsored Content
Top Forums Shell Programming and Scripting get part of file with unique & non-unique string Post 302354264 by durden_tyler on Thursday 17th of September 2009 03:43:18 PM
Old 09-17-2009
Quote:
Originally Posted by andrewsc
the perl code does work for me. Can the awk be modified to grab the section 5 rows earlier? Also, include the last line that has the ENDSTM.
...
Sorry, flexibility of regular expressions is one of the (many) reasons I tend to favor Perl. Smilie

Anyway -

Code:
$
$ ##
$ awk 'BEGIN {x = -1}
>      /123456/ {x=0; n=NR}
>      /ENDSTM/ && x==0 {x=1; s[NR]=$0}
>      x<1 {s[NR]=$0}
>      END {for (i=n-5; i<=length(s); i++) {print s[i]}}' f1
stm1 - line 1
stm1 - line 2
stm1 - line 3
ENDSTM
 
123456
stm2 - line 1
stm2 - line 2
stm2 - line 3
stm2 - line 4
ENDSTM
$
$

tyler_durden
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Unique String

Hi, While creating users in one of my application, the passowrd for the user has to obey the following rules. password cannot be the same as the user name password must have a minimum of six characters password must have a maximum of 100 characters password must have at least one alpha... (1 Reply)
Discussion started by: azmathshaikh
1 Replies

2. Shell Programming and Scripting

Need help with finding unique string in log file

Shell script help Here is 3 sample lines from a log file <date> INFO <java.com.blah> abcd:ID= user login <date> DEBUG <java.com.blah> <nlah bla> abcd:ID=123 user login <date> INFO <java.com.blah> abcd:ID=3243 user login I want to find unique "ID" from this log... (3 Replies)
Discussion started by: gubbu
3 Replies

3. Shell Programming and Scripting

Unique string

Hello, Is ther a way to create a uniq string in ksh and to be able to define exactly how many characters will it be? (1 Reply)
Discussion started by: LiorAmitai
1 Replies

4. Shell Programming and Scripting

Change unique file names into new unique filenames

I have 84 files with the following names splitseqs.1, spliseqs.2 etc. and I want to change the .number to a unique filename. E.g. change splitseqs.1 into splitseqs.7114_1#24 and change spliseqs.2 into splitseqs.7067_2#4 So all the current file names are unique, so are the new file names.... (1 Reply)
Discussion started by: avonm
1 Replies

5. Shell Programming and Scripting

grep with date & unique output

alert.log has the entries with ORA-XXXX, .... Mon Sep 24 15:08:09 2012 WARNING: inbound connection timed out (ORA-3136) Mon Sep 24 15:08:09 2012 WARNING: inbound connection timed out (ORA-3136) Mon Sep 24 15:08:09 2012 WARNING: inbound connection timed out (ORA-3136) Mon Sep 24 15:15:01... (4 Replies)
Discussion started by: Daniel Gate
4 Replies

6. UNIX for Dummies Questions & Answers

Print unique lines without sort or unique

I would like to print unique lines without sort or unique. Unfortunately the server I am working on does not have sort or unique. I have not been able to contact the administrator of the server to ask him to add it for several weeks. (7 Replies)
Discussion started by: cokedude
7 Replies

7. Shell Programming and Scripting

Compare columns of multiple files and print those unique string from File1 in an output file.

Hi, I have multiple files that each contain one column of strings: File1: 123abc 456def 789ghi File2: 123abc 456def 891jkl File3: 234mno 123abc 456def In total I have 25 of these type of file. (5 Replies)
Discussion started by: owwow14
5 Replies

8. Shell Programming and Scripting

CSV File:Filter duplicate records from column1 & another column having unique record

Hi Experts, I have csv file with 30, 40 columns Pasting just 2 column for problem description. Need to print error if below combination is not present in file check for column-1 (DocumentNumber) and filter columns where value in DocumentNumber field is same. For all such rows, the field... (7 Replies)
Discussion started by: as7951
7 Replies

9. Programming

find & Replace text using two non-unique delimiters.

I can find and replace text when the delimiters are unique. What I cannot do is replace text using two NON-unique delimiters: Ex., "This html code <text blah >contains <garbage blah blah >. All tags must go,<text > but some must be replaced with <garbage blah blah > without erasing other... (5 Replies)
Discussion started by: bedtime
5 Replies

10. Shell Programming and Scripting

Replace all string matches in file with unique random number

Hello Take this file... Test01 Ref test Version 01 Test02 Ref test Version 02 Test66 Ref test Version 66 Test99 Ref test Version 99 I want to substitute every occurrence of Test{2} with a unique random number, so for example, if I was using sed, substitution would be something... (1 Reply)
Discussion started by: funkman
1 Replies
PPI::Token::QuoteLike(3)				User Contributed Perl Documentation				  PPI::Token::QuoteLike(3)

NAME
PPI::Token::QuoteLike - Quote-like operator abstract base class INHERITANCE
PPI::Token::QuoteLike isa PPI::Token isa PPI::Element DESCRIPTION
The "PPI::Token::QuoteLike" class is never instantiated, and simply provides a common abstract base class for the five quote-like operator classes. In PPI, a "quote-like" is the set of quote-like things that exclude the string quotes and regular expressions. The subclasses of "PPI::Token::QuoteLike" are: qw{} - PPI::Token::QuoteLike::Words `` - PPI::Token::QuoteLike::Backtick qx{} - PPI::Token::QuoteLike::Command qr// - PPI::Token::QuoteLike::Regexp <FOO> - PPI::Token::QuoteLike::Readline The names are hopefully obvious enough not to have to explain what each class is. See their pages for more details. You may note that the backtick and command quote-like are treated separately, even though they do the same thing. This is intentional, as the inherit from and are processed by two different parts of the PPI's quote engine. SUPPORT
See the support section in the main module. AUTHOR
Adam Kennedy <adamk@cpan.org> COPYRIGHT
Copyright 2001 - 2011 Adam Kennedy. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. The full text of the license can be found in the LICENSE file included with this module. perl v5.18.2 2011-02-25 PPI::Token::QuoteLike(3)
All times are GMT -4. The time now is 01:26 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy