Perl-Hashes mit einem Array von Schlüsseln

Question

Gibt es für ein Array, das n Elemente enthält (n mehr als 1), eine elegante Möglichkeit, auf das Element in einer Hash-Struktur zu verweisen, in der jedes Element der Schlüssel in der Sequenz ist?

Zum Beispiel:

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

dies oder etwas ähnliches gegeben, würde Ich mag die folgenden zugreifen:

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

Wenn dies eine feste Anzahl von Elementen war es einfach sein würde, aber Ich werde nicht wissen, wie viele es zur Laufzeit sein wird (sicher nie mehr als 6 oder 7, aber ansonsten nicht zu entschuldigen).

Die einzigen Muster, die ich mir vorstellen kann, beinhalten Schleifen und Referenzen und sehen unbeholfen aus. Gibt es etwas, das nicht eine halbe Seite braucht oder Data :: Dumper erfordert, wenn Sie einen Tippfehler haben, nur um zu debuggen?

Answer 1

Deshalb Data::Diver existiert:

#!/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);