> @uni = map { $inc[$_] - $inc[$_ - 1] } (1..$#inc);

О, спасибо :-) Просто же.

-- 
Andrew Shitov
______________________________________________________________________
[email protected] | http://shitov.ru
--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org

Ответить