从Perl中的哈希中提取键和值

您可以使用keys函数从Perl中的哈希中获取所有键的列表，该函数具有以下语法-

keys %HASH

此函数返回命名哈希的所有键的数组。以下是示例-

示例

#!/usr/bin/perl
%data = ('John Paul' => 45, 'Lisa' => 30, 'Kumar' => 40);
@names = keys %data;
print "$names[0]\n";
print "$names[1]\n";
print "$names[2]\n";

输出结果

这将产生以下结果-

Lisa
John Paul
Kumar

同样，您可以使用values函数来获取所有值的列表。此函数具有以下语法-

语法

values %HASH

此函数返回一个普通数组，其中包含命名哈希的所有值。以下是示例-

示例

#!/usr/bin/perl
%data = ('John Paul' => 45, 'Lisa' => 30, 'Kumar' => 40);
@ages = values %data;
print "$ages[0]\n";
print "$ages[1]\n";
print "$ages[2]\n";

输出结果

这将产生以下结果-

30
45
40