1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
|
## name ForeachHash
## failures 4
## cut
foreach my $foo (%hash) { ... }
for my $foo (%hash) { ... }
foo foreach %hash;
foo for %hash;
## name ForeachKeys
## failures 0
## cut
foreach my $foo (keys %hash) { ... }
for my $foo (keys %hash) { ... }
foo foreach keys %hash;
foo for keys %hash;
## name ForeachValues
## failures 0
## cut
foreach my $foo (values %hash) { ... }
for my $foo (values %hash) { ... }
foo foreach values %hash;
foo for values %hash;
## name ForeachCopyRef
## failures 0
## cut
foreach my $foo (@{[%hash]}) { ... }
for my $foo (@{[%hash]}) { ... }
foo foreach @{[%hash]};
foo for @{[%hash]};
## name ForeachCopyVar
## failures 0
## cut
foreach my $foo (my @d = %hash) { ... }
for my $foo (my @d = %hash) { ... }
foo foreach my @d = %hash;
foo for my @d = %hash;
|
