Branch Coverage

blib/lib/Music/CreatingRhythms.pm
Criterion Covered Total %
branch 85 104 81.7


line true false branch
82 0 16 unless $t and defined $p and defined $q
88 9 9 $t eq 'u' ? :
92 28 12 if ($x > $y) { }
102 12 6 if ($x == $y and $i < $n)
103 6 6 $t eq 'u' ? :
122 15 11 if ($n == 0)
148 25 24 if ($n == 0)
149 16 9 if (_allowed($p, $intervals))
159 18 6 if (_allowed($p, $intervals))
179 21 23 if ($n == 0)
180 10 11 if ($k == $m and _allowed($p, $intervals))
190 14 9 if ($k < $m and _allowed($p, $intervals))
210 22 35 if ($n == 0)
211 16 6 if ($k == $m)
221 15 20 if ($k < $m)
231 1 2 unless $n
236 3 0 if ($p % 2 == 0) { }
252 1 2 unless $n
256 8 7 if (int(rand 2) % 2 == 0) { }
272 6 6 if (ref $n) { }
274 5 5 if $i == $digit
278 3 3 if ($digit == 0) { }
3 0 elsif ($digit == 1) { }
0 0 elsif ($digit == 2) { }
0 0 elsif ($digit == 3) { }
0 0 elsif ($digit == 4) { }
0 0 elsif ($digit == 5) { }
0 0 elsif ($digit == 6) { }
0 0 elsif ($digit == 7) { }
0 0 elsif ($digit == 8) { }
0 0 elsif ($digit == 9) { }
307 3 1 $n ? :
342 4 11 $_ ? :
361 18 21 if ($k > $n) { }
362 15 3 if ($n % $l == 0)
371 14 7 if ($parts->[$k] == 1) { }
394 30 43 if ($k > $n) { }
395 11 16 if ($n % $l == 0 and _allowed($p, $intervals) and $p <= $n)
404 29 14 if ($parts->[$k] == 1) { }
405 23 6 if (_allowed($p, $intervals) or $k == 1)
429 31 43 if ($k > $n) { }
430 7 5 if ($n % $l == 0 and _allowed($p, $intervals) and $p <= $n and $q == $m)
439 29 14 if ($parts->[$k] == 1) { }
440 24 5 if (_allowed($p, $intervals) or $k == 1)
467 57 74 if ($k > $n) { }
468 10 47 if ($n % $l == 0 and $p == $m)
477 50 24 if ($parts->[$k] == 1) { }
507 11 11 if &all(sub { $_ =~ /^$re$/; } , @$p)
520 7 15 if @$p == $m and &all(sub { $_ =~ /^$re$/; } , @$p)
531 10 20 if @$p == $m
552 18 22 $f & 1 << $k ? :
553 16 24 if ((2 * $j + 1) % 4 > 1)