Каково различие между хешем и ссылкой хеша в Perl?

Простой хеш близок к массиву. Их инициализации даже похожи. Сначала массив:

@last_name = (
  "Ward",   "Cleaver",
  "Fred",   "Flintstone",
  "Archie", "Bunker"
);

Теперь давайте представим ту же информацию с помощью хеша (он же ассоциативный массив):

%last_name = (
  "Ward",   "Cleaver",
  "Fred",   "Flintstone",
  "Archie", "Bunker"
);

Хотя они имеют одинаковое имя, массив @last_name и хэш % last_name полностью независимы.

С массивом, если мы хотим узнать фамилию Арчи, мы должны выполнить линейный поиск:

my $lname;
for (my $i = 0; $i < @last_name; $i += 2) {
  $lname = $last_name[$i+1] if $last_name[$i] eq "Archie";
}
print "Archie $lname\n";

С хешем он намного более прямой синтаксически:

print "Archie $last_name{Archie}\n";

Допустим, мы хотим для представления информации с немного более богатой структурой:

• Тесак (фамилия)
  • Уорд (имя)
  • Джун (имя супруги)
• Флинтстон
  • Фред
  • Вильма
• Бункер
  • Арчи
  • Эдит

До того, как появились ссылки, плоские хэши «ключ-значение» были примерно лучшим из того, что мы могли сделать, но ссылки позволяют

my %personal_info = (
    "Cleaver", {
        "FIRST",  "Ward",
        "SPOUSE", "June",
    },
    "Flintstone", {
        "FIRST",  "Fred",
        "SPOUSE", "Wilma",
    },
    "Bunker", {
        "FIRST",  "Archie",
        "SPOUSE", "Edith",
    },
);

На внутреннем уровне ключи и значения % personal_info все являются скалярами, но значения представляют собой особый вид скаляров: хеш-ссылки, созданные с помощью {} . Ссылки позволяют моделировать «многомерные» хэши. Например, мы можем добраться до Вильмы через

$personal_info{Flintstone}->{SPOUSE}

. Обратите внимание, что Perl позволяет нам опускать стрелки между индексами, поэтому приведенное выше эквивалентно

$personal_info{Flintstone}{SPOUSE}

. Это много ввода, если вы хотите узнать больше о Фреде, поэтому вы можете взять ссылка как своего рода курсор:

$fred = $personal_info{Flintstone};
print "Fred's wife is $fred->{SPOUSE}\n";

Поскольку $ fred в приведенном выше фрагменте является хэш-ссылкой, стрелка необходима. Если вы не укажете его, но включите с умом , используйте strict , чтобы помочь вам отловить такого рода ошибки компилятор пожалуется:

Global symbol "%fred" requires explicit package name at ...

Ссылки Perl похожи на указатели в C и C ++, но они никогда не могут быть нулевыми. Указатели в C и C ++ требуют разыменования, как и ссылки в Perl.

Параметры функций C и C ++ имеют семантику передачи по значению: они просто копии, поэтому изменения не возвращаются вызывающей стороне. Если вы хотите увидеть изменения, вам нужно передать указатель. Вы можете получить этот эффект со ссылками в Perl:

sub add_barney {
    my($personal_info) = @_;

    $personal_info->{Rubble} = {
        FIRST  => "Barney",
        SPOUSE => "Betty",
    };
}

add_barney \%personal_info;

Без обратной косой черты, add_barney получил бы копию, которая была бы выброшена, как только подгруппа вернется.

Обратите внимание также на использование "fat". запятая "( => ) выше. Он автоматически заключает строку в кавычки и делает инициализацию хеша менее синтаксически шумной.

но они никогда не могут быть нулевыми. Указатели в C и C ++ требуют разыменования, как и ссылки в Perl.

Параметры функций C и C ++ имеют семантику передачи по значению: они просто копии, поэтому изменения не возвращаются вызывающей стороне. Если вы хотите увидеть изменения, вам нужно передать указатель. Вы можете получить этот эффект со ссылками в Perl:

sub add_barney {
    my($personal_info) = @_;

    $personal_info->{Rubble} = {
        FIRST  => "Barney",
        SPOUSE => "Betty",
    };
}

add_barney \%personal_info;

Без обратной косой черты, add_barney получил бы копию, которая была бы выброшена, как только подгруппа вернется.

Обратите внимание также на использование "fat". запятая "( => ) выше. Он автоматически заключает строку в кавычки и делает инициализацию хеша менее синтаксически шумной.

но они никогда не могут быть нулевыми. Указатели в C и C ++ требуют разыменования, как и ссылки в Perl.

Параметры функций C и C ++ имеют семантику передачи по значению: они просто копии, поэтому изменения не возвращаются вызывающей стороне. Если вы хотите увидеть изменения, вам нужно передать указатель. Вы можете получить этот эффект со ссылками в Perl:

sub add_barney {
    my($personal_info) = @_;

    $personal_info->{Rubble} = {
        FIRST  => "Barney",
        SPOUSE => "Betty",
    };
}

add_barney \%personal_info;

Без обратной косой черты, add_barney получил бы копию, которая была бы выброшена, как только подгруппа вернется.

Обратите внимание также на использование "fat". запятая "( => ) выше. Он автоматически заключает строку в кавычки и делает инициализацию хеша менее синтаксически шумной.

поэтому изменения не возвращаются вызывающему. Если вы хотите увидеть изменения, вам нужно передать указатель. Вы можете получить этот эффект со ссылками в Perl:

sub add_barney {
    my($personal_info) = @_;

    $personal_info->{Rubble} = {
        FIRST  => "Barney",
        SPOUSE => "Betty",
    };
}

add_barney \%personal_info;

Без обратной косой черты, add_barney получил бы копию, которая была бы выброшена, как только подгруппа вернется.

Обратите внимание также на использование "fat". запятая "( => ) выше. Он автоматически заключает строку в кавычки и делает инициализацию хеша менее синтаксически шумной.

поэтому изменения не возвращаются вызывающему. Если вы хотите увидеть изменения, вам нужно передать указатель. Вы можете получить этот эффект со ссылками в Perl:

sub add_barney {
    my($personal_info) = @_;

    $personal_info->{Rubble} = {
        FIRST  => "Barney",
        SPOUSE => "Betty",
    };
}

add_barney \%personal_info;

Без обратной косой черты, add_barney получил бы копию, которая была бы выброшена, как только подгруппа вернется.

Обратите внимание также на использование "fat". запятая "( => ) выше. Он автоматически заключает строку в кавычки и делает инициализацию хеша менее синтаксически шумной.