in reply to merging anonymous arrays

And another option:

my $a_ref = [qw/A B C D E F G H/];
my $b_ref = [qw/7 6 5 4 3 2 1 0/];
my @KEY;

splice( @KEY, @KEY, 0, $a_ref->[$_], $b_ref->[$_] ) for 0 .. $#{$a_ref
+};

[download]

Replies are listed 'Best First'.
Re^2: merging anonymous arrays
by teamassociated (Sexton) on Nov 16, 2012 at 16:27 UTC
    have a look at List::MoreUtils....good stuff for such work.
[reply]

In Section Seekers of Perl Wisdom