| lib/ChordPro/Output/Common.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 29 | 42 | 69.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 30 | 1377 | 852 | 177 | $m->{'key'} and $m->{'capo'} |
| 852 | 62 | 115 | $m->{'key'} and $m->{'capo'} and my $capo = $m->{'capo'}[-1] | |
| 111 | 0 | 0 | 32 | 0 < $arg and $arg < 4000 |
| 115 | 96 | 0 | 32 | 1 <= $digit and $digit <= 3 |
| 96 | 0 | 0 | 6 <= $digit and $digit <= 8 | |
| 158 | 0 | 0 | 37 | $book and @$book |
| 164 | 27 | 2 | 8 | @fields == 1 and $fields[0] eq "songindex" |
| 302 | 69 | 8 | 117 | index($_, 'sort') && is_arrayref($t->{'meta'}{"sort$_"}) |
| line | l | !l | condition |
|---|---|---|---|
| 38 | 0 | 2406 | $m->{'tuning'} //= [join(" ", ChordPro::Chords::get_tuning())] |
| 254 | 168 | 0 | shift @$split // "" |
| 302 | 77 | 0 | ((index($_, 'sort') && is_arrayref($t->{'meta'}{"sort$_"}) ? $t->{'meta'}{"sort$_"}[0] : undef) // $t->{'meta'}{$_}[0]) // "" |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 37 | 993 | 36 | 1377 | $m->{'key_actual'} //= $m->{'key'} |
| 54 | 0 | 2406 | 0 | $m->{'today'} //= strftime($main::config->{'dates'}{'today'}{'format'}, localtime time) |
| 261 | 12 | 158 | 1 | $s->[1] // $s->[0] |
| 302 | 117 | 77 | 0 | (index($_, 'sort') && is_arrayref($t->{'meta'}{"sort$_"}) ? $t->{'meta'}{"sort$_"}[0] : undef) // $t->{'meta'}{$_}[0] |