| line |
true |
false |
branch |
|
49
|
69 |
45 |
if (is_estr($atom))
|
|
50
|
0 |
45 |
if (is_int($atom))
|
|
51
|
0 |
45 |
if ($atom eq '')
|
|
52
|
45 |
0 |
if (is_str($atom))
|
|
58
|
0 |
15 |
if (is_string($estr_array))
|
|
70
|
1131 |
0 |
if (is_string($str))
|
|
72
|
124 |
1007 |
if (ord $char > 6)
|
|
79
|
117 |
14 |
if (is_false($char))
|
|
80
|
0 |
14 |
if (is_true($char))
|
|
118
|
0 |
0 |
if (is_array($stack))
|
|
147
|
2 |
0 |
if (is_string($data))
|
|
156
|
2 |
0 |
if (is_string($str))
|
|
164
|
3 |
0 |
if is_string($data)
|
|
170
|
0 |
0 |
if (is_array($data))
|
|
178
|
3 |
0 |
if (is_array($data))
|
|
212
|
0 |
0 |
unless -e $file
|
|
214
|
0 |
0 |
unless open my $fh, '<:encoding(UTF-8)', $file
|
|
220
|
0 |
0 |
unless open my $fh, '>:encoding(UTF-8)', $file
|
|
228
|
45 |
1018 |
if is_string($data)
|
|
229
|
1018 |
0 |
if is_array($data)
|
|
235
|
0 |
0 |
if (is_string($str))
|
|
245
|
0 |
0 |
if (is_array($array))
|
|
246
|
0 |
0 |
if ($to > 0)
|
|
251
|
0 |
0 |
if (defined $to)
|
|
281
|
0 |
0 |
if is_digit($char)
|
|
282
|
0 |
0 |
if $char ~~ [('a', 'b', 'c', 'd', 'e', 'f')]
|
|
283
|
0 |
0 |
if $char ~~ [('A', 'B', 'C', 'D', 'E', 'F')]
|
|
294
|
0 |
0 |
if is_digit($r)
|
|
295
|
0 |
0 |
if is_alpha($r)
|
|
311
|
0 |
0 |
if index($str, $start) == 0
|
|
341
|
0 |
0 |
if (not -e $file) { }
|
|
385
|
0 |
0 |
if ($error)
|