Branch Coverage
| blib/lib/Perl6/Junction/One.pm |
|
| Criterion |
Covered |
Total |
% |
| branch |
109 |
110 |
99.0
|
| line |
true |
false |
branch |
|
8
|
5 |
12 |
if ref $_[1] eq 'Regexp' |
|
14
|
12 |
15 |
if ($_ == $test) |
|
15
|
2 |
10 |
if $count |
|
20
|
8 |
2 |
if $count |
|
24
|
4 |
3 |
if ref $_[1] eq 'Regexp' |
|
30
|
3 |
3 |
if ($_ != $test) |
|
31
|
1 |
2 |
if $count |
|
36
|
1 |
1 |
if $count |
|
42
|
7 |
10 |
if $switch |
|
47
|
11 |
18 |
if ($_ >= $test) |
|
48
|
3 |
8 |
if $count |
|
53
|
5 |
2 |
if $count |
|
59
|
4 |
8 |
if $switch |
|
64
|
8 |
15 |
if ($_ > $test) |
|
65
|
2 |
6 |
if $count |
|
70
|
4 |
2 |
if $count |
|
76
|
3 |
11 |
if $switch |
|
81
|
11 |
12 |
if ($_ <= $test) |
|
82
|
2 |
9 |
if $count |
|
87
|
7 |
2 |
if $count |
|
93
|
4 |
8 |
if $switch |
|
98
|
8 |
13 |
if ($_ < $test) |
|
99
|
2 |
6 |
if $count |
|
104
|
4 |
2 |
if $count |
|
112
|
3 |
3 |
if ($_ eq $test) |
|
113
|
1 |
2 |
if $count |
|
118
|
1 |
1 |
if $count |
|
126
|
4 |
5 |
if ($_ ne $test) |
|
127
|
1 |
3 |
if $count |
|
132
|
2 |
1 |
if $count |
|
138
|
4 |
7 |
if $switch |
|
143
|
7 |
6 |
if ($_ ge $test) |
|
144
|
2 |
5 |
if $count |
|
149
|
3 |
2 |
if $count |
|
155
|
4 |
7 |
if $switch |
|
160
|
8 |
6 |
if ($_ gt $test) |
|
161
|
2 |
6 |
if $count |
|
166
|
4 |
1 |
if $count |
|
172
|
3 |
7 |
if $switch |
|
177
|
5 |
9 |
if ($_ le $test) |
|
178
|
1 |
4 |
if $count |
|
183
|
3 |
3 |
if $count |
|
189
|
4 |
8 |
if $switch |
|
194
|
8 |
8 |
if ($_ lt $test) |
|
195
|
2 |
6 |
if $count |
|
200
|
4 |
2 |
if $count |
|
209
|
8 |
4 |
if ($_ =~ /$test/) |
|
210
|
3 |
5 |
if $count |
|
215
|
2 |
0 |
if $count |
|
224
|
4 |
7 |
unless ($_ =~ /$test/) |
|
225
|
1 |
3 |
if $count |
|
230
|
2 |
1 |
if $count |
|
238
|
5 |
6 |
if ($_) |
|
239
|
1 |
4 |
if $count |
|
244
|
3 |
1 |
if $count |