Хеши Perl с массивом ключей

Question

Учитывая массив, содержащий n элементов (n более 1), есть ли элегантный способ ссылаться на элемент в структуре хэша, где каждый элемент является ключом в последовательности?

Например:

my @foo = ('a','b','z'); 

Учитывая это или что-то подобное, я хотел бы получить доступ к следующим:

$hash->{'a'}->{'b'}->{'z'} 

Если это фиксированное число элементов, было бы просто, но Я не буду знать, сколько это будет во время выполнения (конечно, не более 6 или 7, но в противном случае неопознано).

Единственные узоры, которые я могу придумать, включают циклы и ссылки и выглядят неуклюжими. Есть ли что-то, что не занимает половину страницы или не требует Data :: Dumper, если у вас есть опечатка в нем только для отладки?

Answer 1

Вот почему Data::Diver существует:

#!/usr/bin/perl 
use warnings; 
use strict; 

use Data::Diver qw{ Dive }; 

my $hash = { a => { b => { z => 'HERE' } } }; 

my @foo = qw(a b z); 

print Dive($hash, @foo);