http://qs321.pair.com?node_id=308333


in reply to appending arrays

my $a2count = $#array2;
my @newarray;
for (my $a1count = 0; $a1count<@array1; @a1count++ ) {
    push @newarray, @array1[$a1count] . @array2[$a2count--];
}

[download]


Dave


"If I had my life to live over again, I'd be a plumber." -- Albert Einstein

In Section Seekers of Perl Wisdom