Sponsored Content
Top Forums Shell Programming and Scripting Korn Shell Array maximum value less than other value Post 302528964 by ther2000 on Wednesday 8th of June 2011 09:48:18 AM
Old 06-08-2011
Korn Shell Array maximum value less than other value

I have a text file with several key words that I am trying to isolate. I have grepped for the unknowns in the text file, but each unknown has a corresponding location. I have created an array that holds all the unknowns and another array that holds all of the locations and compares them based on the line number in the report. the locations are always before the unknowns, so I compare positions in the array to check that the location line number is less than the unknown line number. However, the problem is there are multiple locations and multiple unknowns, so if the unknown is above several locations it prints all of those locations whereas I want the closes one. Please see the code:

Code:
 
typeset -i i=0
typeset -i j=0
grep -h -n "LOCATION" $R_FILE | cut -d ':' -f 1 | while read value
do 
arr[i]="$value"
i=$(( $i + 1))
done
 
grep -h -n "unknown" $R_FILE | cut -d ':' -f 1 | while read value
do 
uarr[j]="$value"
j=$(( $j + 1))
done
 
for j in ${uarr[@]}; 
do 
         for i in ${arr[@]};
         do
                         if (($j > $i)) 
                               then 
                                      LOC=$(awk "NR==$i" $R_FILE)
                                      UNK=$(awk "NR==$j" $R_FILE)
                                      print $LOC","$UNK | awk -F"," '{print $1","$2","$4","$5","$3}' >> output 
                         fi
            done
done

Output is as follows:

Code:
LOCATION: M1,19,8300,unknown,
LOCATION: M1,13,eeee,unknown,eooeo
LOCATION: B,13,eeee,unknown,eooeo
LOCATION: M1,5,TICKLISH,unknown,83838388383
LOCATION: B,5,TICKLISH,unknown,83838388383
LOCATION: CL 1-2,5,TICKLISH,unknown,83838388383
LOCATION: CL 1-1,5,TICKLISH,unknown,83838388383
LOCATION: CL 2-2,5,TICKLISH,unknown,83838388383
LOCATION: CL 2-1,5,TICKLISH,unknown,83838388383

Output should be:

Code:
LOCATION: M1,19,8300,unknown,
LOCATION: B,13,eeee,unknown,eooeo
LOCATION: CL 2-1,5,TICKLISH,unknown,83838388383


Last edited by ther2000; 06-08-2011 at 11:13 AM.. Reason: Please use code tags
 

10 More Discussions You Might Find Interesting

1. UNIX for Advanced & Expert Users

Oracle To Korn Shell Array

I'm attempting to populate an array in ksh using the following command: set -A $(SELECT_INVOICE | sed '/^$/d') SELECT_INVOICE is a function that executes the SQL query. Problem: Some of the invoice numbers have alpha characters with spaces(example: OVEN MICRO). The Korn shell is treating... (1 Reply)
Discussion started by: kdst
1 Replies

2. Shell Programming and Scripting

korn shell array?

I read it is possible to provide values for an array with the -A option to the read statement; however, I have not been able to get this to work. When I execute a script with the -A option to the read statement, the shell complains that it is an illegal option. If this works, can someone provide... (5 Replies)
Discussion started by: cstovall
5 Replies

3. UNIX for Dummies Questions & Answers

Maximum Command Length for Korn shell

What is the maximum size of a command which can be given in telnet command prompt in unixfor Korn shell? (2 Replies)
Discussion started by: miltony
2 Replies

4. Shell Programming and Scripting

Unix Korn Shell Array Issue (SunOS)

Hello, I'm currently messing around with arrays for the first time in scripting (Unix Korn Shell). All I'm trying to do right now before I make things complicated is read through and print out to screen whether the read file is or is not a directory. Here is my directory: ls -l total... (5 Replies)
Discussion started by: Janus
5 Replies

5. Shell Programming and Scripting

I can't decalar an array in my korn shell script

I have a script that contains #!/usr/bin/ksh set -A X 'hallo' 'world' echo ${X} echo ${X} when I execute it I get an errror message sh ./test.ksh ./test.ksh: -A: bad option(s) but if I do this at the command prompt I am able to create it set -A myarray '1' '2' '3' echo ${myarray}... (4 Replies)
Discussion started by: zilla30066
4 Replies

6. Shell Programming and Scripting

Could someone give me an example of awk accessing array defined in Korn Shell?

As per title and much apprecieated! (2 Replies)
Discussion started by: biglau
2 Replies

7. Shell Programming and Scripting

need help with korn shell array

I have a korn shell script that reads a file with just one column in the file. If the file has more than 5 entries it is split using split -5. This means that is we have 15 entries I will end up with 3 files with 5 entries/lines in each and if I have 23 entries I will end up with 5 files with the... (2 Replies)
Discussion started by: kieranfoley
2 Replies

8. Shell Programming and Scripting

Generate array name at run time Korn shell

Hi, I am trying to define number of array based on constant derived during execution phase of a script. Here is what i am trying.. #First Part, Get LUN input from User lun_count=4 count=0 set -A my_lun while : do while ]; do read L?"Enter Lun "$count" Number:" ... (2 Replies)
Discussion started by: harris2107
2 Replies

9. Shell Programming and Scripting

'*' vs. '@' in Korn Shell Array Variables

In order to use the shellcurses functions described at: Shell Curses function library I am learning about ksh, which has arrays. My trusty Kochan & Wood book says that for any Korn Shell array AR : ${AR } expands to all the defined array elements, and ${#AR } expands to the number... (3 Replies)
Discussion started by: Clovis_Sangrail
3 Replies

10. Shell Programming and Scripting

How to append to array within conditional block in ksh/korn shell?

Hi, I have one array created and some values are there in ksh. I want to append some other values to it based on some condition in if statement. #!/bin/ksh echo "---------------------------------------------------" set -A ipaddr_arr $(egrep -v '^#|^::|^$' /etc/hosts |awk '{print $1}'... (2 Replies)
Discussion started by: sanzee007
2 Replies
unknown(n)						       Tcl Built-In Commands							unknown(n)

__________________________________________________________________________________________________________________________________________________

NAME
unknown - Handle attempts to use non-existent commands SYNOPSIS
unknown cmdName ?arg arg ...? _________________________________________________________________ DESCRIPTION
This command is invoked by the Tcl interpreter whenever a script tries to invoke a command that does not exist. The default implementation of unknown is a library procedure defined when Tcl initializes an interpreter. You can override the default unknown to change its func- tionality, or you can register a new handler for individual namespaces using the namespace unknown command. Note that there is no default implementation of unknown in a safe interpreter. If the Tcl interpreter encounters a command name for which there is not a defined command (in either the current namespace, or the global namespace), then Tcl checks for the existence of an unknown handler for the current namespace. By default, this handler is a command named ::unknown. If there is no such command, then the interpreter returns an error. If the unknown command exists (or a new handler has been registered for the current namespace), then it is invoked with arguments consisting of the fully-substituted name and arguments for the original non-existent command. The unknown command typically does things like searching through library directories for a command proce- dure with the name cmdName, or expanding abbreviated command names to full-length, or automatically executing unknown commands as sub-pro- cesses. In some cases (such as expanding abbreviations) unknown will change the original command slightly and then (re-)execute it. The result of the unknown command is used as the result for the original non-existent command. The default implementation of unknown behaves as follows. It first calls the auto_load library procedure to load the command. If this succeeds, then it executes the original command with its original arguments. If the auto-load fails then unknown calls auto_execok to see if there is an executable file by the name cmd. If so, it invokes the Tcl exec command with cmd and all the args as arguments. If cmd cannot be auto-executed, unknown checks to see if the command was invoked at top-level and outside of any script. If so, then unknown takes two additional steps. First, it sees if cmd has one of the following three forms: !!, !event, or ^old^new?^?. If so, then unknown carries out history substitution in the same way that csh would for these constructs. Finally, unknown checks to see if cmd is a unique abbreviation for an existing Tcl command. If so, it expands the command name and executes the command with the original arguments. If none of the above efforts has been able to execute the command, unknown generates an error return. If the global variable auto_noload is defined, then the auto-load step is skipped. If the global variable auto_noexec is defined then the auto-exec step is skipped. Under nor- mal circumstances the return value from unknown is the return value from the command that was eventually executed. EXAMPLE
Arrange for the unknown command to have its standard behavior except for first logging the fact that a command was not found: # Save the original one so we can chain to it rename unknown _original_unknown # Provide our own implementation proc unknown args { puts stderr "WARNING: unknown command: $args" uplevel 1 [list _original_unknown {*}$args] } SEE ALSO
info(n), proc(n), interp(n), library(n), namespace(n) KEYWORDS
error, non-existent command Tcl unknown(n)
All times are GMT -4. The time now is 04:35 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy