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

[Denis Evdokimov]

Это?

ср, 2 окт. 2024 г. в 09:22, Alessandro Gorohovski via Moscow-pm <
moscow-pm на pm.org>:

> Жаль, что не совсем по subject,
> но спасибо за "пищу для размышлений".
>
>
> вт, 1 окт. 2024 г. в 23:15, Alexander Batyrshin <0x62ash на gmail.com>:
>
>> Когда-то давно я юзала https://metacpan.org/pod/Data%3A%3AFind для
>> поиска в сложных вложенных структурах.
>>
>>
>>
>> On 1 Oct 2024, at 12:34, Alessandro Gorohovski via Moscow-pm <
>> moscow-pm на pm.org> wrote:
>>
>> Уважаемое сообщество, приветствую!
>>
>> Подскажите, может кто-нибудб знает/сталкивался:
>> существует ли способ узнать родительский ключ хеша по ссылке?
>>
>> # Например, есть хеш
>> 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
>> moscow-pm на pm.org | http://moscow.pm.org
>>
>>
>> --
> Moscow.pm mailing list
> moscow-pm на pm.org | http://moscow.pm.org
>
----------- следующая часть -----------
Вложение в формате HTML было извлечено…
URL: <http://mail.pm.org/pipermail/moscow-pm/attachments/20241002/10008b15/attachment-0001.html>