Copy of array by index value fails Post: 303012774

Sponsored Content

Top Forums Shell Programming and Scripting Copy of array by index value fails Post 303012774 by Chubler_XL on Thursday 8th of February 2018 09:33:53 PM

02-08-2018

Moderator

Here is a solution using awk. I use RS (record separator) to load a whole record into $0 this makes stripping out required values and replacing fields simple and avoids making multiple passes over the input.

Code:

# file to be processed
input_file=$1
# prefix to add to firstline
output_file=$2
# sdf tag with name field
name_tag=$3
# sdf tag with substitution field
sub_tag=$4
# string to check for on line following name tag line
check_for=$5
# prefix to add to firstline
prefix=$6

awk '
{
  ID=$0
  sub(".*<" sub_tag ">\n", "", ID)
  sub(/\n.*/, "", ID);

  CN=$0
  sub(".*<" name_tag ">\n", "", CN)
  sub(/\n.*/, "", CN)

  if (CN ~ "^" check_for) {
      new_CN ="PubChem_CID_" ID
      sub(/^[^\n]*\n/, prefix new_CN  "\n")
      sub("<" name_tag ">\n[^\n]*\n", "<" name_tag ">\n" new_CN  "\n")
  }
  print $0 "\n$$$$"
}
' RS="\n[$]{4}\n" name_tag="$name_tag" sub_tag="$sub_tag" check_for="$check_for" prefix="$prefix" $input_file > $output_file

Last edited by Chubler_XL; 02-08-2018 at 10:38 PM.. Reason: Longer variable names for more readiability

This User Gave Thanks to Chubler_XL For This Post:

Chubler_XL

View Public Profile for Chubler_XL

Find all posts by Chubler_XL

10 More Discussions You Might Find Interesting

1. Filesystems, Disks and Memory

why the inode index of file system starts from 1 unlike array index(0)

why do inode indices starts from 1 unlike array indexes which starts from 0 its a question from "the design of unix operating system" of maurice j bach id be glad if i get to know the answer quickly :)

2. UNIX for Dummies Questions & Answers

wh inode index starts from 1 unlike array index (0)

brothers why inode index starts from 1 unlike array inex which starts from 0 its a question from the design of unix operating system of maurice j.bach i need to know the answer urgently...someone help please

3. Shell Programming and Scripting

Problem when assign the array with the string index

I come across the problems when assigning the array in the script below . How to use the array with the 'string index' correctly ? When I assign a new string index , the array elements that are previously assigned are all changed .:eek::eek::eek: $ array=211 $ echo ${array} 211 $...

4. UNIX for Advanced & Expert Users

sql variable as array index

hi folks i am facing problom while trying to access sql variable as array index ina unix shell script....script goes as below.. #!/bin/ksh MAX=3 for elem in alpha beeta gaama do arr=$elem ((x=x+1)) Done SQL_SERVER='servername' /apps/sun5/utils/sqsh -S $SQL_SERVER -U user -P pwd -b -h...

5. Shell Programming and Scripting

awk array index help

$ cat file.txt A|X|20 A|Y|20 A|X|30 A|Z|20 B|X|10 A|Y|40 Summing up $NF based on first 2 fields, $ awk -F "|" 'BEGIN {OFS="|"} { sum += $NF } END { for (f in sum) print f,sum } ' file.txt o/p: A|X|50 A|Y|60 A|Z|20

6. Shell Programming and Scripting

dynamic index for array in while loop

Hi, I'm just trying to use a dynamic index for some array elements that I'm accessing within a loop. Specifically, I want to access an array at variable position $counter and then also at location $counter + 1 and $counter + 2 (the second and third array positions after it) but I keep getting...

7. Shell Programming and Scripting

how to search array and print index in ksh

Hi, I am using KSH shell to do some programming. I want to search array and print index value of the array. Example.. nodeval4workflow="DESCRIPTION ="" ISENABLED ="YES" ISVALID ="YES" NAME="TESTVALIDATION" set -A strwfVar $nodeval4workflow strwfVar=DESCRIPTION=""...

8. Shell Programming and Scripting

build array name based on loop index

Hi, I am new to perl and I have the following query please help here. I have following array variables declaration @pld1 = qw(00 01 02 03 04 05); @pld2 = qw(10 11 12 13 14 15); for(my $k=1;$k<=2;$k++) { //I want here to use @pld1 if $k is 1 // and @pld2 if $k is 2. How to do...

9. Shell Programming and Scripting

Index problem in associate array in awk

I am trying to reformat the table by filling any missing rows. The final table will have consecutive IDs in the first column. My problem is the index of the associate array in the awk script. infile: S01 36407 53706 88540 S02 69343 87098 87316 S03 50133 59721 107923...

10. Shell Programming and Scripting

Associative array index question

I am trying to assign indexes to an associative array in a for loop but I have to use an eval command to make it work, this doesn't seem correct I don't have to do this with regular arrays For example, the following assignment fails without the eval command: #! /bin/bash read -d "\0" -a...

LEARN ABOUT REDHAT

aggregate-ios

AGGREGATE-IOS(1)					      General Commands Manual						  AGGREGATE-IOS(1)

NAME

       aggregate-ios - optimise a concatenated set of cisco/IOS prefix filters to help make them nice and short.

SYNOPSIS

       aggregate-ios <source_config >optimised_config

DESCRIPTION

       Takes  cisco IOS configuration on stdin, and optimises any prefix filters found using aggregate(1).  Optimised filters are produced on std-
       out.

OPTIONS

       None.

DIAGNOSTICS

       Any diagnostics produced by aggregate(1) are passed through on stderr.

EXAMPLES

       The following configuration fragment:

	 ip prefix-list AS65530 description Foo, Inc
	 ip prefix-list AS65530 permit 10.1.0.0/16
	 ip prefix-list AS65530 permit 10.2.0.0/16
	 ip prefix-list AS65530 permit 10.2.1.0/24
	 ip prefix-list AS65530 permit 10.3.0.0/16
	 ip prefix-list AS65531 description Bar.Com
	 ip prefix-list AS65531 seq 5 permit 192.168.1.0/24
	 ip prefix-list AS65531 seq 10 permit 192.168.2.0/24
	 ip prefix-list AS65531 seq 15 permit 192.168.0.0/19

       is optimised as follows:

	 ip prefix-list AS65530 permit 10.1.0.0/16 le 24
	 ip prefix-list AS65530 permit 10.2.0.0/15 le 24
	 ip prefix-list AS65531 permit 192.168.0.0/19 le 24

SEE ALSO

       aggregate(1)

HISTORY

       Aggregate-ios was written by Joe Abley <jabley@mfnx.net>.

BUGS

       All those in aggregate(1) and then some :)

Joe Abley							 2000 November 27						  AGGREGATE-IOS(1)