in reply to Summing the elements of multiple arrays into a new array

If you don't mind destroying @foo and @bar in the process.... 
push @foobar, shift(@foo) + shift(@bar) while @foo || @bar;

[download]
(you could use temporary copies of @foo and @bar to avoid losing them in the calculation)

-Blake

In Section Seekers of Perl Wisdom