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

前端之家收集整理的这篇文章主要介绍了如何才能在Perl中获得哈希的唯一部分?前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
有没有办法获得一个子哈希?我需要使用散列片?

例如:

%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/};

猜你在找的Perl相关文章