http://www.perlmonks.org?node_id=270707


in reply to Passing Any Range of Values to a Sub

to live TMTOWTDT out, here are some other ways;
one cannot recommend the first one, but the second is a clean way:

1. a nice eval-trick, i think abigail-II used it in a sig
eval join ('*', @list);
2. something more functional?
have a look at Language::Functional. the relevant bits are the functions foldl/foldr
$x = foldl { shift() + shift() } 0, [1..6]; # 21
this is the POD example.

HTH a bit at least :-)