Condition Coverage

lib/ChordPro/Config.pm
Criterion Covered Total %
condition 65 142 45.7


and 3 conditions

line !l l&&!r l&&r condition
99 119 130 0 $a and $cfg[$a]{'_src'} eq $cfg[$a - 1]{'_src'}
170 0 833 0 @$_ and @$_ != 3
310 0 0 0 $dir ne "" and not "File::Spec"->file_name_is_absolute($c)
347 80 119 0 @$c and $c->[0] eq "append"
377 0 0 0 $delta and not defined $cfg->{'tuning'}
480 15 0 2 ref $hash->{$key} eq "ARRAY" and ref $self->{$key} eq "ARRAY"
562 3 0 3 _ref($self) eq "HASH" and _ref($orig) eq "HASH"
582 4 0 2 _ref($orig->{$key}) eq "HASH" and _ref($self->{$key}) eq "HASH"
2 0 2 _ref($orig->{$key}) eq "ARRAY" and _ref($self->{$key}) eq "ARRAY"
1 0 0 not defined $self->{$key} and _ref($orig->{$key}) eq "ARRAY"
1 0 0 not defined $self->{$key} and _ref($orig->{$key}) eq "ARRAY" and not @{$orig->{$key};}
1 0 0 not defined $orig->{$key} and _ref($self->{$key}) eq "ARRAY"
1 0 0 not defined $orig->{$key} and _ref($self->{$key}) eq "ARRAY" and not @{$self->{$key};}
617 0 0 3 _ref($self) eq "ARRAY" and _ref($orig) eq "ARRAY"
714 19716 0 6689 ref $right->{$key} eq "HASH" and ref $res{$key} eq "HASH"
16454 357 2905 ref $right->{$key} eq "ARRAY" and ref $res{$key} eq "ARRAY"

or 2 conditions

line l !l condition
64 9 0 $main::options // {}
68 28 91 $main::options->{'verbose'} //= 0
118 119 0 $ENV{'USER'} || $ENV{'LOGNAME'} || getlogin || getpwuid $< || 'chordpro'
119 119 0 eval { do { (getpwuid $<)[6] } } || ''
136 0 0 $new->{'pdf'}{'diagrams'}{'show'} //= "right"
159 357 0 $cfg->{'pdf'}{'formats'}{'first'}{$_} // 1
204 0 1190 $cfg->{'pdf'}{'fonts'}{$ff}{'color'} //= "foreground"
205 119 1071 $cfg->{'pdf'}{'fonts'}{$ff}{'background'} //= "background"
253 0 0 ChordPro::Chords::get_parser() // ""
406 0 0 $path //= ""
577 0 0 $state //= "M"
582 2 0 $self->{$key} // ""
2 0 $orig->{$key} // ""
590 2 2 $state //= "M"
611 0 1 $state //= "M"
614 3 0 $state // "I"
625 0 1 $state //= "M"
627 1 0 $state // "I"
666 0 0 $state // "I"
787 283139 132 $path //= ""

or 3 conditions

line l !l&&r !l&&!r condition
141 0 0 0 $new->{'toc'}{'title'} //= $new->{'pdf'}{'formats'}{'default'}{'toc-title'}
198 1071 0 119 $cfg->{'pdf'}{'fonts'}{$ff}{'name'} or $cfg->{'pdf'}{'fonts'}{$ff}{'description'}
0 119 0 $cfg->{'pdf'}{'fonts'}{$ff}{'name'} or $cfg->{'pdf'}{'fonts'}{$ff}{'description'} or $cfg->{'pdf'}{'fonts'}{$ff}{'file'}
473 45 0 0 exists $self->{$key} or $path =~ /^pdf\.(?:info|fonts|fontconfig)\./u
45 0 0 exists $self->{$key} or $path =~ /^pdf\.(?:info|fonts|fontconfig)\./u or $path =~ /^meta\./u
0 0 0 exists $self->{$key} or $path =~ /^pdf\.(?:info|fonts|fontconfig)\./u or $path =~ /^meta\./u or $key =~ /^_/u
555 60 0 8 &reftype($self) // ref $self
571 6 0 0 exists $self->{$key} or $key =~ /^_/u
582 2 2 2 _ref($orig->{$key}) eq "HASH" and _ref($self->{$key}) eq "HASH" or _ref($orig->{$key}) eq "ARRAY" and _ref($self->{$key}) eq "ARRAY"
0 0 1 not defined $self->{$key} and _ref($orig->{$key}) eq "ARRAY" and not @{$orig->{$key};} or not defined $orig->{$key} and _ref($self->{$key}) eq "ARRAY" and not @{$self->{$key};}
589 0 0 4 $m eq "D" or $m eq "I"
706 26048 0 357 exists $res{$key} or $path eq "pdf.fontconfig."
26048 0 357 exists $res{$key} or $path eq "pdf.fontconfig." or $path =~ /^pdf\.(?:info|fonts)\./u
0 0 357 exists $res{$key} or $path eq "pdf.fontconfig." or $path =~ /^pdf\.(?:info|fonts)\./u or $path =~ /^meta\./u
0 0 357 exists $res{$key} or $path eq "pdf.fontconfig." or $path =~ /^pdf\.(?:info|fonts)\./u or $path =~ /^meta\./u or $path =~ /^delegates\./u
0 0 357 exists $res{$key} or $path eq "pdf.fontconfig." or $path =~ /^pdf\.(?:info|fonts)\./u or $path =~ /^meta\./u or $path =~ /^delegates\./u or $path =~ /^debug\./u
0 357 0 exists $res{$key} or $path eq "pdf.fontconfig." or $path =~ /^pdf\.(?:info|fonts)\./u or $path =~ /^meta\./u or $path =~ /^delegates\./u or $path =~ /^debug\./u or $key =~ /^_/u
831 11 1 0 $p //= $def