Branch Coverage

lib/ICC/Profile/curf.pm
Criterion Covered Total %
branch 0 60 0.0


line true false branch
37 0 0 if (@_)
40 0 0 if (@_ == 1 and ref $_[0] eq 'HASH') { }
78 0 0 unless @_ == 3
96 0 0 unless @_ == 4
138 0 0 if $#{$$self[1];} == 0
147 0 0 if $bp >= $in
155 0 0 if (UNIVERSAL::isa($self->[1][$ix], 'ICC::Profile::parf')) { }
0 0 elsif (UNIVERSAL::isa($self->[1][$ix], 'ICC::Profile::samf')) { }
187 0 0 if $#{$$self[1];} == 0
196 0 0 if $bp >= $in
204 0 0 if (UNIVERSAL::isa($self->[1][$ix], 'ICC::Profile::parf')) { }
0 0 elsif (UNIVERSAL::isa($self->[1][$ix], 'ICC::Profile::samf')) { }
233 0 0 if (@_)
236 0 0 unless ref $_[0] eq 'ARRAY'
257 0 0 if (@_)
260 0 0 unless ref $_[0] eq 'ARRAY'
285 0 0 ref $p eq 'ARRAY' ? :
0 0 defined $p ? :
288 0 0 defined $p->[0] && !ref($p->[0]) ? :
312 0 0 if ($attr eq 'segment') { }
0 0 elsif ($attr eq 'breakpoint') { }
315 0 0 unless UNIVERSAL::isa($_, 'ICC::Profile::parf')
0 0 if (ref $hash->{$attr} eq 'ARRAY' and @{$hash->{$attr};} == grep({UNIVERSAL::isa($_, 'ICC::Profile::samf') unless UNIVERSAL::isa($_, 'ICC::Profile::parf');} @{$$hash{$attr};})) { }
331 0 0 if (ref $hash->{$attr} eq 'ARRAY' and @{$hash->{$attr};} == grep({not ref $_;} @{$$hash{$attr};})) { }
372 0 0 if ($segs == 1) { }
0 0 elsif ($segs > 1) { }
381 0 0 if ($buf eq 'parf') { }
412 0 0 if ($buf eq 'parf' or $buf eq 'samf') { }
446 0 0 unless @{$self->[1];} > 0
449 0 0 unless @{$self->[1];} == @{$self->[2];} + 1