如何才能在Perl中获得哈希的唯一部分？

发布时间：2020-12-15 21:18:00 所属栏目：大数据来源：网络整理

导读：有没有办法获得一个子哈希？我需要使用散列片？例如： %hash = ( a = 1,b = 2,c = 3 ); 我只想要 %hash = ( a = 1,b = 2 ); 解决方法 Hash slices返回与一个键列表关联的值。要获取散列片，您将sigil更改为@并提供一个键列表(在本例中为“a”和“b”)： my

有没有办法获得一个子哈希？我需要使用散列片？

例如：

%hash = ( a => 1,b => 2,c => 3 );

我只想要

%hash = ( a => 1,b => 2 );

解决方法

Hash slices返回与一个键列表关联的值。要获取散列片，您将sigil更改为@并提供一个键列表(在本例中为“a”和“b”)：

my @items = @hash{"a","b"};

通常您可以使用引号字操作符来生成列表：

my @items = @hash{qw/a b/};

你也可以分配一个散列片，所以如果你想要一个包含另一个哈希的子集的新哈希，你可以说

my %new_hash;
@new_hash{qw/a b/} = @hash{qw/a b/};

许多人会使用map而不是哈希片：

my %new_hash = map { $_ => $hash{$_} } qw/a b/;

从Perl 5.20.0开始，如果您使用％sigil而不是@ sigil，您可以一步获取键和值：

my %new_hash = %hash{qw/a b/};

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!