On Tue, 07 Jun 2011 21:36:40 +0300, Alexander Onokhov wrote:
$ perl -MList::Util=sum -le 'print sum 1, 2, 3'
6
Спасибо, конечно,
но а без модулей и подпрограмм обойтись можно
?
2011/6/7 Aleksander Gorohovski <[email protected]>
Уважаемое сообщество,
Доброго времени суток!
Подскажите можно ли более изящно, без промежуточной переменной $sum,
как это обычно делаю:
my $sum;
$sum += $_ for @m;
подсчитать сумму элементов массива @m
?
Спасибо.
--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org
--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org
