Branch Coverage

lib/Data/Displaycolour.pm
Criterion Covered Total %
branch 43 116 37.0


line true false branch
223 0 1 if (defined(my $so = delete $opts{'subobjects'}))
230 0 1 if (ref $palette eq 'ARRAY' and scalar @{$palette;} >= 1) { }
231 0 0 if (ref $_) { }
236 0 0 if (defined(my $name = $_abstract_rgb_to_name{fc $colour}))
245 0 1 if (not defined $self->{'origin'} and defined(my $for = delete $opts{'for'}))
247 0 0 if (defined $_abstract_ise_to_name{eval {
0 0 elsif ($for->isa('Data::URIID::Result')) { }
261 0 0 if defined $id
266 1 5 if (defined(my $for = $opts{'for_' . $key}))
268 1 1 if ($step eq 'fc') { }
1 0 elsif ($step eq 'trim') { }
279 1 0 length $for ? :
284 1 5 if (defined(my $for_text = $opts{'for_' . $key}))
292 0 1 if (defined(my $list = delete $opts{'language'}))
295 0 0 unless ref $list
299 0 1 if (defined(my $list = delete $opts{'preferred_language'}))
301 0 0 unless ref $list
305 0 1 if (defined(my $list = delete $opts{'blacklist_language'}))
306 0 0 unless ref $list
317 0 113 if $v
323 1 407 if $v
333 1 0 if ($v > $best_v)
339 1 0 if defined $best
344 1 5 if defined $opts{'from'}
347 0 1 unless (delete $opts{'no_defaults'} or defined $opts{'from'})
349 0 0 if (defined(my $for = $opts{'for_' . $key}))
350 0 0 unless (defined $self->{'origin'})
366 1 0 if (defined(my $from = delete $opts{'from'}))
375 1 0 if (defined $ise)
376 1 0 if (defined(my $name = $_abstract_ise_to_name{$ise}))
382 0 1 unless (defined $self->{'origin'})
387 0 1 if scalar keys %opts
418 0 1 if scalar keys %opts
424 0 0 unless (defined $v or $no_defaults)
430 1 0 if defined $v
432 0 0 if $exists_default
446 0 0 if (defined(my $c = $palette->{$name}))
462 0 6 if scalar keys %opts
466 1 5 unless (exists $self->{$key})
468 1 0 if (defined(my $func = $self->can('_load_' . $key)))
473 6 0 if (defined(my $val = $self->{$key}))
477 0 0 if $exists_default
486 5 1 if defined $extractor
501 520 1 unless defined $pre and defined $post
502 0 1 length $pre ? :
0 1 length $post ? :
510 0 0 if (defined $rgb and defined(my $name = $_abstract_rgb_to_name{fc $rgb}))
511 0 0 if (defined(my $ise = $_abstract_names_to_ise{$name}))
523 1 0 if (defined(my $ise = $abstract->ise("default", undef)))
524 1 0 if (defined(my $name = $_abstract_ise_to_name{$ise}))
527 1 0 if (defined($c = $self->{'palette'}{$name})) { }
0 0 elsif (defined($c = $_default_colours{$name})) { }
543 0 0 if scalar keys %opts
545 0 0 if ($class eq 'abstract-colours') { }
0 0 elsif ($class eq 'specific-colours') { }
0 0 elsif ($class eq 'palettes') { }
0 0 elsif ($class eq ':all') { }
552 0 0 if (ref $value) { }