| blib/lib/HTML/Element/Tiny.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 25 | 38 | 65.7 |
| line | l | !l | condition |
|---|---|---|---|
| 59 | 0 | 498 | exists ${$class . '::';}{'TAG_CLASS'} and *{${$class . '::';}{'TAG_CLASS'};}{'HASH'} |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 126 | 27 | 0 | 238 | (defined $$spec{'id'} ? $$spec{'id'} eq ($self->id || '') : 1) && ($$spec{-'tag'} ? $$spec{-'tag'} eq $self->tag : 1) && ($$spec{'class'} ? !grep({my $c = $_; not grep({$_ eq $c;} $self->classes);} split(/\s+/, $$spec{'class'}, 0)) : 1) && !grep({$$spec{$_} ne ($self->attr($_) || '') if $_ ne 'id' and $_ ne '-tag' and $_ ne 'class';} keys %$spec) |
| 214 | 0 | 0 | 0 | $extra and %$extra |
| 295 | 9 | 12 | 0 | defined $val and $_ ne 'class' || length $val |
| line | l | !l | condition |
|---|---|---|---|
| 27 | 6 | 6 | $HTML::Element::Tiny::_modver{$module} || 0 |
| 90 | 4 | 283 | delete $$attr{'class'} || '' |
| 291 | 0 | 10 | $arg ||= {} |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 63 | 497 | 1 | 0 | $$tag_lookup{-'base'} ||= $class |
| 64 | 497 | 1 | 0 | $$tag_lookup{-'default'} ||= $class |
| 76 | 286 | 0 | 0 | $$tag_lookup{-'default'} || $HTML::Element::Tiny::TAG_CLASS{-'default'} |
| 212 | 286 | 0 | $tag_class ||= $$tag_lookup{-'default'} || $HTML::Element::Tiny::TAG_CLASS{-'default'} | |
| 278 | 1 | 3 | 1 | $idx{$i} or $obj{&Scalar::Util::refaddr($child)} |
| 295 | 2 | 3 | 7 | $_ ne 'class' || length $val |
| 360 | 14 | 11 | 0 | ref $class || $class |