下面我$size = keys %prices;用來獲取哈希中的條目總數。但是，在下面的示例中有沒有辦法獲得價格低于 4 美元的條目數量？
use strict;
my %prices;
# create the hash
$prices{'pizza'} = 12.00;
$prices{'coke'} = 1.25;
$prices{'sandwich'} = 3.00;
$prices{'pie'} = 6.50;
$prices{'coffee'} = 2.50;
$prices{'churro'} = 2.25;
# get the hash size
my $size = keys %prices;
# print the hash size
print "The hash contains $size elements.\n";
uj5u.com熱心網友回復：
是的，您可以grep對哈希值運行過濾器以快速計算它。
$num_cheap_items = grep { $_ < 4 } values %prices;
@the_cheap_items = grep { $prices{$_} < 4 } keys %prices;
uj5u.com熱心網友回復：
是的，您可以遍歷keys散列的 并檢查每個值是否小于 4：
my $num = 0;
for (keys %prices) {
$num if $prices{$_} < 4;
}
print "less than 4: $num\n";
印刷：
The hash contains 6 elements.
less than 4: 4
轉載請註明出處，本文鏈接：https://www.uj5u.com/ruanti/337144.html