Condition Coverage

blib/lib/HTML/DOM/EventTarget.pm
Criterion Covered Total %
condition 62 107 57.9


and 3 conditions

line !l l&&!r l&&r condition
129 0 99 0 exists $h->{$self} and exists $h->{$self}{$name}
174 3 15 0 exists $aevh{$self} && exists $aevh{$self}{$name} && $aevh{$self}{$name}
207 5255 1247 0 $h && exists $h->{$name}
209 3008 3494 0 not $capture and exists $aevh{$self}
3442 52 0 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 8 0 defined $ret and $name eq 'mouseover' ? $ret : !$ret
258 585 0 1336 $event &&= shift()
261 4 2 1915 defined $name and length $name
265 585 2 1328 $event and not $event->target
305 2956 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 1305 0 4 defined &blessed($event) && $event->isa('HTML::DOM::Event')

or 2 conditions

line l !l condition
274 1895 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 2966 1911 eval { do { $lineage[-1]->parentNode } } || eval { do { $lineage[-1]->event_parent } } || (last)
329 2718 248 $event || (next)
388 1053 236 $event || (next)
391 1151 356 $event || (return 1)
456 3 582 $args{"${event}_default"} || $args{'default'} || (return)

or 3 conditions

line l !l&&r !l&&!r condition
277 1876 19 0 $doc || $target
289 1 1 1909 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 1153 $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 98 0 1207 $args{"${type}_default"} or $args{'default'}