| blib/lib/Text/Chord/Piano.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 14 | 14 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 50 | 70 | 1610 | if $i == $key |
| 52 | 70 | 362 | if ($play) |
| 63 | 1 | 18 | if ref $keyboard ne 'ARRAY' |
| 80 | 1 | 11 | unless $chord_name |
| 82 | 5 | 6 | unless $kind |
| 83 | 1 | 10 | unless defined $tonic |
| 88 | 2 | 33 | if $tone > 23 |