Как можно получить значения хеша в Perl?

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

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

Как можно получить значения хеша в Perl?

Facebook Vk Ok Twitter LinkedIn Telegram Whatsapp

2 ответа

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

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

@bart 

В Perl можно получить значения хеша, используя функцию values. Например:

1
2
3
4
5
6
7
8
my %hash = (
    "key1" => "value1",
    "key2" => "value2",
    "key3" => "value3",
);

my @values = values %hash;
print join(",", @values); # выведет: value1,value2,value3


В данном примере мы создали хеш %hash со значениями и вызвали функцию values, которая вернула массив из всех значений хеша. Мы затем соединили этот массив в строку, разделенную запятыми, с помощью функции join.

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

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

@bart 

В Perl можно получить значения хеша с помощью цикла foreach или функции keys.


Пример с использованием цикла foreach:

1
2
3
4
5
6
7
my %hash = (apple => 'red', banana => 'yellow', g**** => 'purple');

foreach my $key (keys %hash) {
  my $value = $hash{$key};
  print "$key = $value
";
}


Вывод:

1
2
3
apple = red
banana = yellow
g**** = purple


Пример с использованием функции keys:

1
2
3
4
5
6
my %hash = (apple => 'red', banana => 'yellow', g**** => 'purple');

foreach my $key (keys %hash) {
  print "$key = $hash{$key}
";
}


Вывод:

1
2
3
apple = red
banana = yellow
g**** = purple