Help for this page
->{foo}->{bar} or ->{foo}->[0]->{bar}
sub rec_data { my $path = shift; # ->{foo}->{bar} ... # search my @results = rec_data('->{foo}->{bar}', $data);