Понятно, спасибо.

> Лучшим решением будет не использовать while+each и last. Вместо:
>
>     my $config= $self->config->{test};
>     for my $key (keys %$config) {
>         my $val= $config->{$key};
>         ...
>     }
Так и поступил.

-- 


Всего хорошего!
_______________________________________________
Kiev-pm mailing list
[email protected]
http://mail.pm.org/mailman/listinfo/kiev-pm

Ответить