$list1[$_] += $list2[$_] for 0..$#list1; #### ($some_value, $some_other_value, $this_var, $that_var) = @array;