perl – 关于哈希的澄清

发布时间：2020-12-16 06:22:19 所属栏目：大数据来源：网络整理

导读：我正在阅读Damian Conway的“Perl Best Practices”,并发现以下代码snipet： $have_reconsidered{lc($name)}++; 我试图通过哈希来弄清楚这里发生了什么.我知道数字上下文中的增量是1,但它对哈希有什么作用？从perlop documentation开始： undef is always t

我正在阅读Damian Conway的“Perl Best Practices”,并发现以下代码snipet：

$have_reconsidered{lc($name)}++;

我试图通过哈希来弄清楚这里发生了什么.我知道数字上下文中的增量是1,但它对哈希有什么作用？

从perlop documentation开始：

undef is always treated as numeric,
and in particular is changed to 0
before incrementing (so that a
post-increment of an undef value will
return 0 rather than undef). The
auto-decrement operator is not
magical.

所以在上面的例子中,键lc($name)的值是否被初始化为0然后增加到1？

一般来说,我在哪里可以找到更多关于=等的行为……？

解决方法

％has_reconsidered是你的哈希值. $name是一个字符串. lc($name)返回小写字符串. $hash {$key}将返回使用key $key存储的hash％hash的标量值.所以：

// get scalar value from hash at key lc($name) and post-increment it
$have_reconsidered(lc($name)}++;

所以,你所做的就是在给定索引的散列中增加值(即lc($name))

测试用例：

#!/bin/env perl
my %hash = ( 'a' => '2' );
my $name = 'A';
print $hash{lc($name)}++; // prints 2 (incremented after statement)
print $hash{lc($name)};   // prints 3
print ++$hash{lc($name)}; // prints 4 (incremented before statement)

（编辑：李大同）

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