$ perl6 -e'say [+] 1, 2, 3' 6 :-)
2011/6/7 Aleksander Gorohovski <[email protected]> > 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 > -- Andrew Shitov ______________________________________________________________________ [email protected] | http://shitov.ru
-- Moscow.pm mailing list [email protected] | http://moscow.pm.org
