Цитата Ardenen:
Во первых не break, а last, во вторых такое лучше сделать grep'ом:
Код:
my $found_key = (grep { $hash{$_}{'old'} eq 120 } (keys %hash))[0]; »
|
вот, то что нужно было
не вкурсе, быстрее ли работать будет, но то что запись минималистичней - точно, а это уже радует
p.s. возьму на заметку!