|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Andrey Sapozhnikov 2:5020/400 11 Oct 2002 15:19:45 To : Anatoly Moskovsky Subject : Re: hash: автосоздание не существующих ключей --------------------------------------------------------------------------------
Anatoly Moskovsky wrote:
> *** Dmitry Smolin wrote to Anatoly Moskovsky:
>
> DS> Кстати говоря, "помнить" - необязательно. Можно сделать так:
>
> DS> sub hash_val(\%$) {
> DS> my ( $h, $v ) = @_;
> DS> exists $$h{$v} ? $$h{$v} : ( $$h{$v} = undef );
> DS> }
>
> DS> И потом вызывать эту hash_val без лишних проблем со ссылками:
>
> DS> $v = hash_val %h, 'aaa';
>
> Спасибо. Странно, что при многократном прочтении perlsub я на это не обращал
> внимания :)
Да можно вообще прозрачно сделать, чтоб любое обращение вызывало
создание элемента хэша. Вот только нафига? Мне кажется кто-то
опять недочитал доку по Перлу и мудрит нечто бессмысленное,
поскольку реальная надобность в подобном коде очень маловероятна.
Андрей
--- ifmail v.2.15dev5
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/657705d9613e.html, оценка из 5, голосов 10
|