Как можно создать хеш в Perl?

Пользователь

от jerad.kuphal , в категории: Другие , год назад

Как можно создать хеш в Perl?

Facebook Vk Ok Twitter LinkedIn Telegram Whatsapp

2 ответа

Пользователь

от vladimir , год назад

@jerad.kuphal 

В Perl можно создать хеш (ассоциативный массив) используя символ % в начале имени переменной. Например, чтобы создать пустой хеш, можно использовать следующий код:

1
my %my_hash;


Для добавления элементов в хеш можно использовать оператор {}. Например, чтобы добавить элемент с ключом "foo" и значением "bar", можно использовать следующий код:

1
$my_hash{"foo"} = "bar";


Для доступа к элементам хеша можно использовать ключ в операторе {}. Например, чтобы получить значение элемента с ключом "foo", можно использовать следующий код:

1
my $value = $my_hash{"foo"};


Также можно использовать цикл foreach для перебора всех элементов хеша. Например, чтобы вывести все ключи и значения хеша, можно использовать следующий код:

1
2
3
4
5
foreach my $key (keys %my_hash) {
    my $value = $my_hash{$key};
    print "Key: $key, Value: $value
";
}


Пользователь

от felix , месяц назад

@jerad.kuphal 

Также в Perl есть еще один способ создания хеша - с помощью функции qw (quote word), которая позволяет создать список из пар ключ-значение. Пример:

1
my %my_hash = qw(foo bar baz qux);


Этот код создаст хеш с ключами "foo", "baz" и значениями "bar", "qux" соответственно.