How can I sum arrays element-wise in Perl?

arrays perl sum elementwise-operations
Dmytro Leonenko picture Dmytro Leonenko · Dec 8, 2009 · Viewed 17.9k times · Source

I have two arrays:

@arr1 = ( 1, 0, 0, 0, 1 );
@arr2 = ( 1, 1, 0, 1, 1 );

I want to sum items of both arrays to get new one like

( 2, 1, 0, 1, 2 );

Can I do it without looping through arrays?

Answer

catwalk picture catwalk · Dec 8, 2009

for Perl 5:

use List::MoreUtils 'pairwise';
@sum = pairwise { $a + $b } @arr1, @arr2;

Related questions

How can I check if a Perl array contains a particular value?

I am trying to figure out a way of checking for the existence of a value in an array without iterating through the array. I am reading a file for a parameter. I have a long list of parameters I …

Read More
Best way to iterate through a Perl array

Which is the best implementation(in terms of speed and memory usage) for iterating through a Perl array? Is there any better way? (@Array need not be retained). Implementation 1 foreach (@Array) { SubRoutine($_); } Implementation 2 while($Element=shift(@Array)) { SubRoutine($Element); } Implementation 3 …

Read More
How do I remove duplicate items from an array in Perl?

I have an array in Perl: my @my_array = ("one","two","three","two","three"); How do I remove the duplicates from the array?

Read More