Branch Coverage

/root/.cpan/build/Imager-1.017-0/blib/lib/Imager/TrimColorList.pm
Criterion Covered Total %
branch 28 44 63.6


line true false branch
17 0 30 unless $self->add($entry)
27 15 3 if ($c1->isa('Imager::Color')) { }
37 47 121 if ($x < 0) { }
34 87 elsif ($x > 255) { }
51 2 38 if (ref $entry and &Scalar::Util::blessed($entry)) { }
27 11 elsif (ref $entry and &Scalar::Util::reftype($entry) eq 'ARRAY') { }
52 2 0 if ($entry->isa('Imager::Color') or $entry->isa('Imager::Color::Float')) { }
61 3 24 if (@$entry == 1) { }
24 0 elsif (@$entry == 2) { }
62 3 0 if (my $c = Imager::_color($entry->[0])) { }
63 3 0 if ($c->isa("Imager::Color") or $c->isa("Imager::Color::Float"))
74 24 0 if (my $c1 = Imager::_color($entry->[0])) { }
75 22 2 if (&Scalar::Util::looks_like_number($entry->[1]) and $entry->[1] >= 0) { }
2 0 elsif (my $c2 = Imager::_color($entry->[1])) { }
78 21 1 if ($c1->isa('Imager::Color')) { }
106 11 0 if (my $c1 = Imager::_color($entry)) { }
133 0 0 if ($self->count) { }
136 0 0 if ($entry->[0]->isa('Imager::Color')) { }
168 0 5 unless defined $tolerance
170 0 5 unless ($image and $image->{'IMG'})
175 0 5 if ($auto eq 1)
178 5 0 if ($auto eq 'center' or $auto eq 'centre') { }