01-28-2005
Quote:
set -A Y "${X[*]}"
set -A Z "${X[@]}"
While using arrays, I have thought that I would want to copy their elements to other arrays. So far, I haven't had then need. I imagined that this would be the syntax. Thanks for closing the knowledge gap.
Thomas
10 More Discussions You Might Find Interesting
1. UNIX for Advanced & Expert Users
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
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
3. Shell Programming and Scripting
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
4. Shell Programming and Scripting
As per title and much apprecieated! (2 Replies)
Discussion started by: biglau
2 Replies
5. Shell Programming and Scripting
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
6. Shell Programming and Scripting
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
7. Shell Programming and Scripting
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... (12 Replies)
Discussion started by: ther2000
12 Replies
8. Shell Programming and Scripting
Hi all,
Not sure if this should be in the programming forum, but I believe it will get more response under the Shell Programming and Scripting FORUM.
Am trying to write a customized df script in Perl and need some help with regards to using arrays and file handlers.
At the moment am... (3 Replies)
Discussion started by: newbie_01
3 Replies
9. Shell Programming and Scripting
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
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
LEARN ABOUT DEBIAN
font::ttf::segarr
Font::TTF::Segarr(3pm) User Contributed Perl Documentation Font::TTF::Segarr(3pm)
NAME
Font::TTF::Segarr - Segmented array
DESCRIPTION
Holds data either directly or indirectly as a series of arrays. This class looks after the set of arrays and masks the individual sub-
arrays, thus saving a class, we hope.
INSTANCE VARIABLES
All instance variables do not start with a space.
The segmented array is simply an array of segments
Each segment is a more complex affair:
START
In terms of the array, the address for the 0th element in this segment.
LEN Number of elements in this segment
VAL The array which contains the elements
METHODS
Font::TTF::Segarr->new($size)
Creates a new segmented array with a given data size
$s->fastadd_segment($start, $is_sparse, @dat)
Creates a new segment and adds it to the array assuming no overlap between the new segment and any others in the array. $is_sparse
indicates whether the passed in array contains "undef"s or not. If false no checking is done (which is faster, but riskier). If equal to 2
then 0 is considered undef as well.
Returns the number of segments inserted.
$s->add_segment($start, $overwrite, @dat)
Creates a new segment and adds it to the array allowing for possible overlaps between the new segment and the existing ones. In the case of
overlaps, elements from the new segment are deleted unless $overwrite is set in which case the elements already there are over-written.
This method also checks the data coming in to see if it is sparse (i.e. contains undef values). Gaps cause new segments to be created or
not to over-write existing values.
$s->tidy
Merges any immediately adjacent segments
$s->at($addr, [$len])
Looks up the data held at the given address by locating the appropriate segment etc. If $len > 1 then returns an array of values, spaces
being filled with undef.
$s->remove($addr, [$len])
Removes the item or items from addr returning them as an array or the first value in a scalar context. This is very like "at", including
padding with undef, but it deletes stuff as it goes.
$s->copy
Deep copies this array
$s->copy_seg($seg)
Creates a deep copy of a segment
BUGS
No known bugs.
AUTHOR
Martin Hosken Martin_Hosken@sil.org. See Font::TTF::Font for copyright and licensing.
perl v5.10.1 2009-01-21 Font::TTF::Segarr(3pm)