[Moscow.pm] sum of array

[Alexander Onokhov]

$ perl -MList::Util=sum -le 'print sum 1, 2, 3'
6


2011/6/7 Aleksander Gorohovski <angel на feht.dgtu.donetsk.ua>

> Уважаемое сообщество,
> Доброго времени суток!
>
> Подскажите можно ли более изящно, без промежуточной переменной $sum,
> как это обычно делаю:
>
> my $sum;
> $sum += $_ for @m;
>
> подсчитать сумму элементов массива @m
> ?
>
> Спасибо.
> --
> Moscow.pm mailing list
> moscow-pm на pm.org | http://moscow.pm.org
>



-- 
Alexander
----------- следущая часть -----------
Вложение в формате HTML было извлечено…
URL: <http://mail.pm.org/pipermail/moscow-pm/attachments/20110607/7c6ec3ea/attachment.html>