Branch Coverage

blib/lib/Spp/Tools.pm
Criterion Covered Total %
branch 33 78 42.3


line true false branch
23 42 10 if (is_estr($atom))
24 0 42 if (len($atom) < 4)
26 42 0 if (len($atoms) > 0)
36 0 0 if (is_estr($atoms))
38 0 0 unless (is_atom($atom))
47 0 3 if (is_estr($json))
51 3930 5394 if ($mode == 0) { }
5370 24 elsif ($mode == 1) { }
0 24 elsif ($mode == 2) { }
57 0 1110 if (is_digit($ch))
73 0 0 if ($ch eq ',')
74 0 0 if ($ch eq ']')
75 0 0 if (is_digit($ch))
92 0 0 if (is_str($estr))
96 0 0 if ($mode == 0) { }
0 0 elsif ($mode == 1) { }
0 0 elsif ($mode == 2) { }
153 1296 58056 if ($depth == 0) { }
10472 47584 elsif ($depth == 1) { }
154 1296 0 if ($ch eq "\cA")
160 1171 269 if ($mode)
168 528 1027 if ($mode)
175 0 0 if ($mode)
182 1296 0 if ($mode)
185 6181 0 if ($mode)
190 4137 43447 if ($ch eq "\cA")
191 5577 42007 if ($ch eq "\cB")
200 0 966 if (is_str($estr))
204 0 966 if (len($atoms) < 2)
214 0 3 if (len($atoms) == 0)
215 0 3 if (len($atoms) == 1)
265 14 0 if (is_atom($atom))
286 7 0 if (is_atom($atom))
315 0 96 if (exists $table->{$name})
334 0 0 if (is_atom($ast))
345 0 0 if (is_str($value))
346 0 0 if (is_blank($value))
347 0 0 if (is_atom($value))
350 0 0 if (is_atoms($value))