为什么哈希值被打印两次

Question

问题

哈希值在(每个)循环中打印两次.

---

码

use strict;
use warnings;

my %Hash;

my $x=1;

foreach my $item( 1..9 ) {
   $Hash{$x} = $x;
   print scalar keys %Hash,",$item,",$x++,"\n"
}
$x=1;
foreach my $iteml( %Hash){
        print $x++,"\n";
        print "||||$iteml------$Hash{$iteml}||||\n";
}

print "@{[%Hash]}\n";

---

产量

1,1,1
2,2,2
3,3,3
4,4,4
5,5,5
6,6,6
7,7,7
8,8,8
9,9,9
1
||||6------6||||
2
||||6------6||||
3
||||3------3||||
4
||||3------3||||
5
||||7------7||||
6
||||7------7||||
7
||||9------9||||
8
||||9------9||||
9
||||2------2||||
10
||||2------2||||
11
||||8------8||||
12
||||8------8||||
13
||||1------1||||
14
||||1------1||||
15
||||4------4||||
16
||||4------4||||
17
||||5------5||||
18
||||5------5||||
6 6 3 3 7 7 9 9 2 2 8 8 1 1 4 4 5 5

---

题

为什么会这样？

---

版

v5.10.0 built for x86_64-linux-thread-multi

Answer 1

首先,你遍历哈希本身,(%Hash).所以你得到的是键和值,列表.

令人感兴趣的是,哈希具有相同的键和值.所以它打印键及其值,这是相同的.然后它打印该值,然后将其用作键...这是一个有效的键,并具有相同的值.所以看起来它打印两次:)