Привет,
On 07.06.2011 21:34, Aleksander Gorohovski wrote:
Подскажите можно ли более изящно, без промежуточной переменной $sum, как это обычно делаю: my $sum; $sum += $_ for @m;
но а без модулей и подпрограмм обойтись можно
ой не. Ну зачем? Ну куда уж проще? Ну как же без аккумулятора и не пряча в функцию? Извратиться, конечно, можно: perl -e "print eval join '+', (1 .. 10);" но если это изящно, то я крокодил. -- Олег Алистратов -- Moscow.pm mailing list [email protected] | http://moscow.pm.org
