数组 – 为什么我的第一个哈希值在Perl中消失了？

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

导读：为什么哈希在打印输出时删除第一个值apple：2？ use warnings;use strict;use Data::Dumper;my @array = ("apple:2","pie:4","cake:2");my %wordcount;our $curword;our $curnum;foreach (@array) { ($curword,$curnum) = split(":",$_); $wordcount{$curnum

为什么哈希在打印输出时删除第一个值apple：2？

use warnings;
use strict;
use Data::Dumper;

my @array = ("apple:2","pie:4","cake:2");
my %wordcount;
our $curword;
our $curnum;
foreach (@array) {
    ($curword,$curnum) = split(":",$_);
    $wordcount{$curnum}=$curword;
}
print Dumper (%wordcount);

解决方法

Perl哈希只能有唯一的密钥,所以

$wordcount{2} = "apple";

后来被覆盖了

$wordcount{2} = "cake";

（编辑：李大同）

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