Ilya Chesnokov <[email protected]> писал(а) в своём письме Tue, 31 Jul 2012 19:45:04 +0300:

31 июля 2012 г., 20:05 пользователь Alessandro Gorohovski
<[email protected]> написал:
perl -e 'my %a = (a => 3); print ((%a)[1]);'


O, Класс!
Премного благодарен.

Да, это короче, чем я хотел
(values %a)[0]

По-моему (values %a)[0] выглядит читабельнее.
А самый читабельный вариант из предложенных предложил Alexander
Onokhov. Вот так и надо писать код ;)

Возможно вы правы,
но мне интересен был вариант без промежуточных переменных,
поскольку в окончательном должно было быть так:

say"Ok!" if [%a]->[1] > $value;
--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org

Ответить