Re: [Moscow.pm] Узнать родительский ключ по ссылке

Tue, 01 Oct 2024 07:55:03 -0700

Гыыыыы оно живое .....


И так, у тебя есть значение, ты хочешь узнать под каким ключём оно живёт?

А вот теперь представь, это значение лежит сразу в двух хэшах, под разными ключами ....
 
--
 
01.10.2024, 13:34, "Alessandro Gorohovski via Moscow-pm" <[email protected]>:
Уважаемое сообщество, приветствую!
 
Подскажите, может кто-нибудб знает/сталкивался:
существует ли способ узнать родительский ключ хеша по ссылке?
 
# Например, есть хеш
my %h = ( a => { b=> 1}, aa=> {bb=>2, }, );
 
# вызов функции, где необходимо узнать родительский ключ
# например, 'aa'
my $k = &where_key( \%{ $h{aa} } );
 
exit;
 
sub where_key {
  my $sh = shift;
 
  my $k =  ??? if ref( $sh ) eq 'HASH';
 
  return $k;
}
,--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org
-- 
Moscow.pm mailing list
[email protected] | http://moscow.pm.org

Ответить