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

Surprised no one's added the Lisp-style recursive solution yet:

sub radd {
    return( defined $_[0] ? $_[0] + radd(@_[1..$#_]) : 0 );
}
my $sum = radd(1..10);

[download]
  • Comment on Re: How can I add all the numbers in an array with out doing a foreach loop?
  • Download Code

In Section Seekers of Perl Wisdom