line |
true |
false |
branch |
67
|
374 |
23 |
if is_false($atom)
|
68
|
0 |
23 |
if is_true($atom)
|
79
|
0 |
0 |
unless is_array($pairs)
|
81
|
0 |
0 |
unless is_atom($pair)
|
90
|
0 |
0 |
unless -e $file
|
92
|
0 |
0 |
unless open my $fh, '<:encoding(UTF-8)', $file
|
98
|
0 |
0 |
unless open my $fh, '>:encoding(UTF-8)', $file
|
106
|
0 |
3 |
if (is_str($data))
|
117
|
2 |
0 |
if (is_str($data))
|
118
|
0 |
0 |
if (is_array($data))
|
124
|
2 |
0 |
if (is_str($data))
|
125
|
0 |
0 |
if (is_array($data))
|
131
|
0 |
3 |
if is_str($data)
|
132
|
3 |
0 |
if (is_array($data))
|
141
|
24 |
0 |
if is_array($data)
|
142
|
0 |
0 |
if is_str($data)
|
147
|
0 |
0 |
if (is_str($str))
|
157
|
0 |
0 |
if (is_array($array))
|
158
|
0 |
0 |
if ($to > 0)
|
163
|
0 |
0 |
if (defined $to)
|
175
|
0 |
0 |
if (is_str($str))
|
178
|
0 |
0 |
if (is_array($str))
|
206
|
0 |
0 |
if is_digit($char)
|
207
|
0 |
0 |
if $char ~~ [('a', 'b', 'c', 'd', 'e', 'f')]
|
208
|
0 |
0 |
if $char ~~ [('A', 'B', 'C', 'D', 'E', 'F')]
|
219
|
0 |
0 |
if is_digit($r)
|
220
|
0 |
0 |
if is_alpha($r)
|
236
|
0 |
5 |
if is_atom($ast)
|
247
|
6 |
7 |
if (is_str($value))
|
248
|
0 |
7 |
if (len($value) == 0)
|
251
|
5 |
2 |
if (is_atom($value))
|
259
|
111 |
108 |
if index($str, $start) == 0
|