Я понимаю любовь к Perl, но такая запись не так читаема, как прочие. Даже запись [1] уже плоха, ибо надо понимать. Всё грешно.
НО: Все можно делать, если вынести это в отдельную функцию, для которой описать магию, и далее пользоваться только ей. То есть единственно поддерживаемое решение имеет вид типа say 'ololo' if single_value_oof_hash(%h) == 3; И желательно в функцию поставить барьер на несколько элементов. 31 июля 2012 г., 23:36 пользователь Alex Varyanick <[email protected]> написал: > 2012/7/31 Анатолий Шарифулин <[email protected]>: > > Для полноты картины: > > > > say pop @{[ %r ]}; > > > > Ну а хороший вариант (уже предложили выше): > > > > say [%r]->[1]; > > Хз, как-то создание анонимного массива меня немного смущает (IMHO, ни > с кем не хочу спорить). > Больше нравится такое решение: > % perl -le 'my %h = qw/a 3/; print +values%h' > 3 > > -- > Varyanick I. Alex > icq: 102 575 440 > skype: cono.. > [email protected] > -- > Moscow.pm mailing list > [email protected] | http://moscow.pm.org >
-- Moscow.pm mailing list [email protected] | http://moscow.pm.org
