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

[Alessandro Gorohovski]

Жаль, что не совсем по 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
>
>
>
----------- следующая часть -----------
Вложение в формате HTML было извлечено…
URL: <http://mail.pm.org/pipermail/moscow-pm/attachments/20241002/b8cb0504/attachment.html>