Опять же, ничего не увидел :) Много способов выполнить то или иное действие :) Но это Perl, это естественно для него :)
ну если критично именно смещать по одному, то я бы писал так: shift @a while scalar(@a); 27 мая 2010 г. 22:46 пользователь Andrew Shitov <[email protected]> написал: > > Ничего клёвого не увидел. > > А в том, что понаписали в ответ? :-) > > > -- > Andrew Shitov > ______________________________________________________________________ > [email protected] | http://shitov.ru > -- > Moscow.pm mailing list > [email protected] | http://moscow.pm.org >
-- Moscow.pm mailing list [email protected] | http://moscow.pm.org
