| line | % | coverage | branch |
|---|
| 175 | 50 | T | F | unless defined $args |
| 267 | 100 | T | F | unless defined $nwctxt and length $nwctxt |
| 281 | 100 | T | F | unless defined $header and index($header, $HEADER_PREFIX) == 0 |
| 292 | 100 | T | F | unless defined $line and length $line |
| 293 | 100 | T | F | if $line =~ /\A\s*\z/ |
| 296 | 100 | T | F | if ++$self->{'_record_count'} > $MAX_RECORDS |
| 299 | 100 | T | F | unless $line =~ /\A\|/ |
| 355 | 50 | T | F | unless defined $fields and @$fields |
| 359 | 100 | T | F | if (exists $DISPATCH{$type}) { } |
| 363 | 100 | T | F | if (defined $staff) |
| 393 | 50 | T | F | if substr($line, 0, 1) eq "|" |
| 401 | 100 | T | F | if ($in_quote) { } |
| 402 | 100 | T | F | if ($ch eq '"') { } |
| 100 | T | F | elsif ($ch eq '\\' and $pos + 1 < $len) { } |
| 412 | 100 | T | F | if ($ch eq '"') { } |
| 100 | T | F | elsif ($ch eq '|') { } |
| 435 | 100 | T | F | if ($field =~ /\A([^:]+):(.*)\z/) { } |
| 456 | 50 | T | F | defined $h->{'Size'} ? : |
| 100 | T | F | ($h->{'Bold'} // 'N') eq 'Y' ? : |
| 100 | T | F | ($h->{'Italic'} // 'N') eq 'Y' ? : |
| 465 | 100 | T | F | if exists $h->{$key} |
| 490 | 50 | T | F | ($h->{'Visible'} // 'Y') eq 'Y' ? : |
| 492 | 100 | T | F | if (defined $h->{'EndingBar'}) |
| 496 | 100 | T | F | if defined $h->{'Channel'} |
| 497 | 100 | T | F | if defined $h->{'WithNextStaff'} |
| 498 | 100 | T | F | if defined $h->{'Volume'} |
| 499 | 100 | T | F | if defined $h->{'StereoPan'} |
| 500 | 50 | T | F | ($h->{'Muted'} // 'N') eq 'Y' ? : |
| 512 | 100 | T | F | if (defined $h->{'DynVel'} and length $h->{'DynVel'}) |
| 515 | 50 | T | F | if (@vels == @keys) |
| 532 | 50 | T | F | unless (exists $VALID_CLEFS{$type}) |
| 537 | 100 | T | F | if (not $staff->has_notes) { } |
| 559 | 100 | T | F | if (not $staff->has_notes) { } |
| 575 | 100 | T | F | unless (defined $beats and defined $beat_type) |
| 583 | 100 | T | F | if (not $staff->has_notes) { } |
| 699 | 100 | T | F | if ($tok eq 'Dotted') { } |
| 100 | T | F | elsif ($tok eq 'DblDotted') { } |
| 100 | T | F | elsif ($tok =~ /\ATriplet(?:=(.+))?\z/) { } |
| 50 | T | F | elsif ($tok eq 'Grace') { } |
| 711 | 100 | T | F | unless defined $opts_str and length $opts_str |
| 714 | 100 | T | F | if ($opt =~ /\A(\w+)=(.*)\z/) { } |
| 748 | 100 | T | F | if (not defined $placement and defined $h->{'Pos'}) |
| 749 | 100 | T | F | $h->{'Pos'} >= 0 ? : |
| 764 | 0 | T | F | $ends_h ? : |
| 0 | T | F | $starts_h ? : |
| 0 | T | F | $starts_h && $ends_h ? : |
| 833 | 50 | T | F | $pos >= 0 ? : |
| 877 | 100 | T | F | unless defined $staff |
| 888 | 100 | T | F | unless defined $sig and length $sig |
| 889 | 100 | T | F | if $sig eq $KEY_SIG_NATURAL |
| 894 | 50 | T | F | unless @acc |
| 896 | 100 | T | F | if (index($acc[0], '#') != -1) { } |
| 100 | T | F | elsif (substr($acc[0], -1, 1) eq 'b') { } |
| 906 | 50 | T | F | unless exists $MESSAGES{$key} |