Ничего клёвого не увидел. @a = (); # православно
если только до первого ложного значения, но это уже магия, а не очистка :) 27 мая 2010 г. 12:50 пользователь Andrew Shitov <[email protected]> написал: > Увидел вот такой код внутри класса. > > sub clear{ > my $template = shift @args; > @{$self->{tokens}} = (); > foreach (map {$_->{name}} @{$template->{si}}){ > while (my $r = shift @{$self->{$_}->{res}}){} > } > } > > > Заслуживает внимания способ очистки массива: > > while (my $r = shift @a) {} > > Клево же :-) > > -- > 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
