|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Danil Pismenny 2:5020/52 28 Nov 2000 13:17:09 To : All Subject : коротко получить значение первого ключа из хэшрефа -------------------------------------------------------------------------------- Hарод, как лучше сделать сабж? Есть функция: sub hr {{a=>1,b=>2,c=>3}} надо взять быстренько взять занчение первого ключа, на ум приходит только два вариант: my ($a)=values %{hr()}; и совсем ужасный: my $a=[values %{hr()}]->[0]; Можеткто подскажет что-нибудь более короткое? --- Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) * Origin: Mr. Postman (2:5020/52.0) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/42549cb2d1501.html, оценка из 5, голосов 10
|