Что означает $ x -> {_foo} -> {_bar} на Perl?

Question

Я пытаюсь понять скрипт Perl, и я не понимаю одну строку объявления, которая:

$pin =  $x -> {_foo} -> {_bar}

, тогда как _bar - это неопределенная переменная, объявленная в другом подпрограмме.

Answer 1

Ожидается, что значение $x будет ссылкой на хеш.

$x->{_foo} - это значение элемента с ключом _foo хеша, на которое ссылается $x.

Ожидается, что это значение будет ссылкой на хеш.

$x->{_foo}->{_bar} - это значение элемента с ключом _bar хеша, на которое ссылается $x->{_foo}.

Например, он вернет 123 для следующего:

my $x = {
   _foo => {
      _bar => 123,
   }
};