07-14-2008
'unshift' adds to the beginning of an array, 'push' adds to the end of an array.
10 More Discussions You Might Find Interesting
1. UNIX for Dummies Questions & Answers
The way I've been using arrays currently have been:
#!/bin/ksh
set -A myArray
myArray=value1
myArray=value2
myArray=value3
myArray=value4
Is there a way I can assign values to an array that will automatically place the value into the next element in the array like:
myArray=value1... (4 Replies)
Discussion started by: yongho
4 Replies
2. Shell Programming and Scripting
hi every body,
i donot know how to assign a array varible with a file
see i having file
more file
property1 Name
property2 Address
the above two line are tab Space seperated between the property and its value
i want to seperate it and assign to... (1 Reply)
Discussion started by: kkraja
1 Replies
3. Shell Programming and Scripting
Just wondering if there's a better way to get these complete sentences into an array and keep the quotes intact? All the quotes make it look ugly to me but it works. I want to be able to refer to the full sentences by index. I've tried a few qw and qq/ aproaches but what I have below seems about... (4 Replies)
Discussion started by: gctaylor
4 Replies
4. Shell Programming and Scripting
I need to do something like this:
for i in 1 2 3 4 5; do
arr=$(awk 'NR="$i" { print $2 }' file_with_5_records)
done
That is, parse a file and assign values to an array in an ascending order relative to the number of record in the file that is being processed on each loop.
Is my... (2 Replies)
Discussion started by: fiori_musicali
2 Replies
5. Shell Programming and Scripting
Hi
can anyone suggest me how to write a file containing values,... say
19
20
21
22
..
40
to an array @array = (19, 20, ... 40)
-- Thanks (27 Replies)
Discussion started by: meghana
27 Replies
6. Shell Programming and Scripting
Hello,
Can somebody please give me a snippet for the below requirement.
I want to assign the values separeted by a comma to be assigned to a dynamic array.
If I give an input (read statement) like abc1,abc2,abc3,abc4,abc5, all these strings abc* should be assigned to an array like below... (2 Replies)
Discussion started by: suneelj
2 Replies
7. Shell Programming and Scripting
I wrote a simply perl that searched a file for a particualr value and if it found it, rite it and the next three lines to a file. Now I have been asked to check those next three lines for a different value and only write those lines if it finds the second value.
I was thinking the best way to... (1 Reply)
Discussion started by: billprice13
1 Replies
8. Shell Programming and Scripting
hi
My script as below
#!/bin/ksh
for i in `seq 1 7`
do
a=$(awk '{print $i}' /home/rama/expenese.txt)
done
for i in `seq 1 7`
do
echo "${a}"
done
content of expense.txt is as below
5032 210179 3110 132813874 53488966 11459221 5300794
I want output as... (6 Replies)
Discussion started by: Ramakrishna V
6 Replies
9. Shell Programming and Scripting
Hi ,
i have file which is having two fields in it (#delimited)
ABC#FILE_01.DAT
DEF#FILE_02.DAT
i want to write first field values to one array example A_01 and second field values to B_02 array
please let me know how to do this ,my final requirement i have send out a mail for each record... (2 Replies)
Discussion started by: kkabc789
2 Replies
10. Shell Programming and Scripting
I know that
@food = %fruit;
Works. But how do I assign %fruit and %veggies to @food ? (2 Replies)
Discussion started by: popeye
2 Replies
LEARN ABOUT DEBIAN
mail::box::tie::array
Mail::Box::Tie::ARRAY(3pm) User Contributed Perl Documentation Mail::Box::Tie::ARRAY(3pm)
NAME
Mail::Box::Tie::ARRAY - access an existing message folder as array
SYNOPSIS
use Mail::Box::Manager;
my $mgr = Mail::Box::Manager->new;
my $folder = $mgr->open(folder => 'inbox');
use Mail::Box::Tie::ARRAY;
tie my(@inbox), 'Mail::Box::Tie::ARRAY', $folder;
# deprecated, but works too
use Mail::Box::Tie;
tie my(@inbox), 'Mail::Box::Tie', $folder;
foreach (@inbox) {print $_->short}
print $_->print foreach @inbox;
my $emails = @inbox;
print $inbox[3];
print scalar @inbox;
push @inbox, Mail::Box::Message->new(...);
delete $inbox[6];
print $inbox[0]->head->get('status');
my $folder = tied @inbox;
untie @inbox;
DESCRIPTION
Certainly when you look at a folder as a list of messages, it is logical to access the folder through an array.
Not all operations on arrays are supported. Actually, most functions which would reduce the size of the array are modified instead to mark
messages for deletion.
Examples what you cannot do:
shift/unshift/pop/splice @inbox;
METHODS
Constructors
TIEARRAY('Mail::Box::Tie::ARRAY', FOLDER)
Create the tie on an existing folder.
example: tie an array to a folder
my $mgr = Mail::Box::Manager->new;
my $inbox = $mgr->new(folder => $ENV{MAIL});
tie my(@inbox), 'Mail::Box::Tie::Array', ref $inbox, $inbox;
Tied Interface
$obj->DELETE()
Flag a message to be removed. Be warned that the message stays in the folder, and is not removed before the folder is written.
example:
delete $inbox[5];
$inbox[5]->delete; #same
$obj->FETCH(INDEX)
Get the message which is at the indicated location in the list of messages contained in this folder. Deleted messages will be returned
as "undef".
example:
print $inbox[3]; # 4th message in the folder
print @inbox[3,0]; # 4th and first of the folder
print $inbox[-1]; # last message
$obj->FETCHSIZE()
Return the total number of messages in a folder. This is called when the folder-array is used in scalar context, for instance.
example:
if(@inbox > 10) # contains more than 10 messages?
my $nrmsgs = @inbox;
$obj->PUSH(MESSAGES)
Add MESSAGES to the end of the folder.
example:
push @inbox, $newmsg;
$obj->STORE(INDEX, MESSAGE)
Random message replacement is not permitted --doing so would disturb threads etc. An error occurs if you try to do this. The only
thing which is allowed is to store a message at the first free index at the end of the folder (which is also achievable with PUSH()).
example:
$inbox[8] = $add;
$inbox[-1] = $add;
push @inbox, $add;
$obj->STORESIZE(LENGTH)
Sets all messages behind from LENGTH to the end of folder to be deleted.
DETAILS
Folder tied as array
Limitations
This module implements "TIEARRAY", "FETCH", "STORE", "FETCHSIZE", "STORESIZE", "DELETE", "PUSH", and "DESTROY".
This module does not implement all other methods as described in the Tie::Array documentation, because the real array of messages is not
permitted to shrink or be mutilated.
SEE ALSO
This module is part of Mail-Box distribution version 2.105, built on May 07, 2012. Website: http://perl.overmeer.net/mailbox/
LICENSE
Copyrights 2001-2012 by [Mark Overmeer]. For other contributors see ChangeLog.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See
http://www.perl.com/perl/misc/Artistic.html
perl v5.14.2 2012-05-07 Mail::Box::Tie::ARRAY(3pm)