in reply to insertion of array element

my @a = qw(a b c d);
#          0 1 2 3
print "@a\n";
# a b c d
splice @a, 2, 0, qw(ba bb bc);
print "@a\n";
# a b ba bb bc c d

[download]

See what perlfunc has to say about splice.

Replies are listed 'Best First'.
Re: Re: insertion of array element
by damian1301 (Curate) on Jun 03, 2001 at 07:56 UTC
    Good post. If you wanted to get it in the middle of an array more that 4 indexes then you could make a slight adjustment to it to be more versatile.

    my @a = (a..g);
print "@a\n";
splice @a, ($#a+1)/2, 0, (1..5);
print "@a\n";

    [download]


    Tiptoeing up to a Perl hacker.
    Dave AKA damian
[reply]
[d/l]
      I keep seeing $#list + 1 in code posted to perlmonks. Remember that this is the same thing as @list in a scalar context.

      Henceforth, I shall wage a jihad against the former expression :) 

         MeowChow                                   
               s aamecha.s a..a\u$&owag.print
[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom