7 июня 2011 г. 22:03 пользователь Aleksander Gorohovski <
[email protected]> написал:

> On Tue, 07 Jun 2011 21:53:56 +0300, Alexander Onokhov wrote:
>
>  Для целочисленных  >= 0 значений в массиве
>>
>> $ perl -le 'print length join "", map 1 x $_, 1, 2, 3'
>> 6
>>
>
> Хороший ход конём. :)
> Жаль только отрицательные за бортом остаются.


Можно поиграть с substr или регекспами. :)

-- 
Andrei Protasovitski
< andrei[dot]protasovitski[at]gmail[dot]com >
Diemen, Netherlands
-- 
Moscow.pm mailing list
[email protected] | http://moscow.pm.org

Ответить