为Perl 5：

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