in reply to How can I add all the numbers in an array with out doing a foreach loop?

Here's a recursive solution: 
    sub sum { @_ ? (shift) + &sum : 0 }

[download]
To be called like: 
    print sum(5, 6, 3);

[download]

Originally posted as a Categorized Answer.

In Section Seekers of Perl Wisdom