Branch Coverage

lib/HTML/Query.pm
Criterion Covered Total %
branch 106 126 84.1


line true false branch
62 2 165 if @_ == 1 and ref $_[0] eq 'ARRAY'
85 19 268 if (not ref $element) { }
268 0 elsif (blessed $element) { }
90 12 7 if (@_) { }
5 2 elsif (@elements) { }
107 266 2 if ($element->isa($element_class)) { }
2 0 elsif ($element->isa($class)) { }
122 5 160 defined $select ? :
133 2 127 unless defined $query and length $query
162 101 272 if ($query =~ / \G (\s+) /cgsx)
163 101 0 defined $1 ? :
168 6 95 if ($leading_whitespace and $comops and $query =~ / \G (\*) \s+ /cgx)
175 27 346 if ($query =~ / \G (>|\+) \s* /cgx)
179 0 27 unless ($comops)
185 223 150 if ($query =~ / \G ([\w\*]+) /cgx)
188 18 205 if ($tag =~ /\*/) { }
189 14 4 if ($leading_whitespace || $comops == 0 and $tag eq '*') { }
193 7 7 if ($comops == 0)
206 1 204 if ($comops == 1 and $tag eq 'html')
217 39 480 if ($query =~ / \G \# ([\w\-]+) /cgx)
223 73 446 if ($query =~ / \G \. ([\w\-]+) /cgx)
229 47 472 if ($query =~ / \G \[ (.*?) \] /cgx)
234 38 9 if ($attribute =~ /(.*?)\s*([\|\~]?=)\s*(.*)/) { }
237 0 38 unless (defined $name and length $name)
243 38 0 if (defined $value) { }
248 33 5 if ($attribute_op eq '=') { }
2 3 elsif ($attribute_op eq '|=') { }
3 0 elsif ($attribute_op eq '~=') { }
266 2 7 unless (defined $attribute and length $attribute)
275 5 512 if ($query =~ / \G : ([\w\-]+) /cgx)
279 3 2 if ($pseudoclass eq 'first-child') { }
2 0 elsif ($pseudoclass eq 'last-child') { }
290 367 150 unless scalar @args > $work
295 128 239 unless @args
303 1 238 if ($hack_sequence == 2) { }
205 33 elsif (not $relationship) { }
16 17 elsif ($relationship eq '>') { }
11 6 elsif ($relationship eq '+') { }
6 0 elsif ($relationship eq '*') { }
308 2 203 if ($$self{'match_self'}) { }
318 108 140 if ($e->root == $e) { }
353 211 69 unless ref $sibling
384 127 1 if ($comops) { }
410 121 7 unless $query =~ / \G \s*,\s* /cgsx
414 0 121 if ($query =~ / \G (.+?) \s* $ /cgsx)
419 1 120 unless ($ops)
423 4 116 wantarray ? :
430 0 328 wantarray ? :
485 24 0 unless (exists $$self{'specificity'}{$selector})
499 2 9 if (defined $setting)
514 0 0 wantarray ? :
525 6 0 @{$self->get_elements;} ? :
531 4 0 @{$self->get_elements;} ? :
551 6 1 if ($self->suppress_errors) { }
552 6 0 if (defined $message)
577 815 95 unless (exists $seen{$item})
595 53 182 scalar @a > scalar @b ? :
599 0 1071 if (not defined $a[$index] || defined $b[$index]) { }
49 1022 elsif (not defined $a[$index]) { }
26 996 elsif (not defined $b[$index]) { }
609 842 154 if ($a[$index] == $b[$index]) { }
632 0 74 if $method eq 'DESTROY'
640 74 0 wantarray ? :