Condition Coverage

blib/lib/HTML/DOM/EventTarget.pm
Criterion Covered Total %
condition 68 107 63.5


and 3 conditions

line !l l&&!r l&&r condition
129 0 4 95 exists $h->{$self} and exists $h->{$self}{$name}
174 3 0 15 exists $aevh{$self} && exists $aevh{$self}{$name} && $aevh{$self}{$name}
207 5288 160 1087 $h && exists $h->{$name}
209 3023 3460 52 not $capture and exists $aevh{$self}
3460 39 13 not $capture and exists $aevh{$self} and exists $aevh{$self}{$name}
39 0 13 not $capture and exists $aevh{$self} and exists $aevh{$self}{$name} and defined(my $aevh = $aevh{$self}{$name})
212 8 0 2 defined &blessed($aevh) && $aevh->can('call_with')
216 2 6 2 defined $ret and $name eq 'mouseover' ? $ret : !$ret
258 585 0 1339 $event &&= shift()
261 4 2 1918 defined $name and length $name
265 585 2 1331 $event and not $event->target
305 2971 0 10 @l and not $initted++
323 0 0 0 $eh and &$eh()
324 18 0 0 defined &blessed($_) && $_->can('handleEvent')
351 780 0 0 defined &blessed($_) && $_->can('handleEvent')
354 3 2 0 $eh and &$eh()
384 223 0 0 defined &blessed($_) && $_->can('handleEvent')
387 0 0 0 $eh and &$eh()
473 1308 0 4 defined &blessed($event) && $event->isa('HTML::DOM::Event')

or 2 conditions

line l !l condition
274 1898 0 $target->can('event_listeners_enabled') || (eval { do { $doc = $target->ownerDocument } } || (next Foo))->can('event_listeners_enabled') || (last Foo)
277 4 0 $event || 1
294 2981 1914 eval { do { $lineage[-1]->parentNode } } || eval { do { $lineage[-1]->event_parent } } || (last)
329 2733 248 $event || (next)
388 1068 236 $event || (next)
391 1154 356 $event || (return 1)
456 3 582 $args{"${event}_default"} || $args{'default'} || (return)

or 3 conditions

line l !l&&r !l&&!r condition
277 1879 19 0 $doc || $target
289 1 1 1912 eval { do { $target->error_handler } } || eval { do { $target->ownerDocument->error_handler } }
308 10 0 0 $event ||= do { (my $e = ($target->ownerDocument || $target)->createEvent($cat))->init(%args, &$args); $e->_set_target($target) unless $e->target; $e }
309 0 0 0 $target->ownerDocument || $target
336 531 229 0 $event ||= do { (my $e = ($target->ownerDocument || $target)->createEvent($cat))->init(%args, &$args); $e->_set_target($target) unless $e->target; $e }
337 229 0 0 $target->ownerDocument || $target
354 775 5 0 eval { do { defined &blessed($_) && $_->can('handleEvent') ? $_->handleEvent($event) : &$_($event); 1 } } or $eh and &$eh()
358 2 398 1156 $event->propagation_stopped || !$event->bubbles
365 19 0 0 $event ||= do { (my $e = ($target->ownerDocument || $target)->createEvent($cat))->init(%args, &$args); $e->_set_target($target) unless $e->target; $e }
366 0 0 0 $target->ownerDocument || $target
387 223 0 0 eval { do { defined &blessed($_) && $_->can('handleEvent') ? $_->handleEvent($event) : &$_($event); 1 } } or $eh and &$eh()
490 100 24 1184 $args{"${type}_default"} or $args{'default'}