> >   $sum = reduce {$_[0]+$_[1]} 0, @numbers || die "Chaos!!";
   > 
   > >Note with the || that way, it'll die immediately if @numbers is empty,
   > >even before destroying the universe.
   > 
   > Yes, but why are you passing the size of the array in there?

:-)

And even if you wrote:

      $sum = reduce(^_+^_, @numbers) || die "Chaos!!";

you're still going to over-react to a zero-sum sequence.

You need:

      defined($sum = reduce ^_+^_, @numbers) || die "Chaos!!";

Damian

Reply via email to