Branch Coverage

blib/lib/POE/Session.pm
Criterion Covered Total %
branch 71 120 59.1


line true false branch
45 0 170 if defined *{"ASSERT_$name";}{'CODE'}
46 0 170 if (defined *{"POE::Kernel::ASSERT_$name";}{'CODE'}) { }
52 0 0 if $@
56 0 170 if $@
68 0 170 if defined *{"TRACE_$name";}{'CODE'}
69 0 170 if (defined *{"POE::Kernel::TRACE_$name";}{'CODE'}) { }
75 0 0 if $@
79 0 170 if $@
90 170 0 unless (defined &ASSERT_DEFAULT)
91 170 0 if (defined &POE::Kernel::ASSERT_DEFAULT) { }
103 170 0 unless (defined &TRACE_DEFAULT)
104 170 0 if (defined &POE::Kernel::TRACE_DEFAULT) { }
169 0 801 unless defined $POE::Kernel::poe_kernel
191 801 0 if (exists $$self[2]{'_start'}) { }
217 2 801 if (@params & 1)
228 358 443 if (exists $params{'args'})
229 358 0 if (ref $params{'args'} eq 'ARRAY') { }
240 4 797 if (exists $params{'options'})
241 4 0 if (ref $params{'options'} eq 'HASH') { }
256 694 496 if ($param_name eq 'inline_states') { }
200 296 elsif ($param_name eq 'package_states') { }
104 192 elsif ($param_name eq 'object_states') { }
192 0 elsif ($param_name eq 'heap') { }
257 0 694 unless ref $param_value eq 'HASH'
261 0 4863 unless ref $handler eq 'CODE'
274 0 200 unless ref $param_value eq 'ARRAY'
276 0 200 if @$param_value & 1
291 100 3 if (ref $handlers eq 'ARRAY') { }
3 0 elsif (ref $handlers eq 'HASH') { }
320 0 104 unless ref $param_value eq 'ARRAY'
322 0 104 if @$param_value & 1
334 0 7 unless ref $object
339 4 3 if (ref $handlers eq 'ARRAY') { }
3 0 elsif (ref $handlers eq 'HASH') { }
410 8 8889 if ($$self[1]{'trace'})
420 317 8580 unless (exists $$self[2]{$state})
426 195 122 unless (exists $$self[2]{'_default'})
427 195 0 exists &Errno::ENOSYS ? :
428 1 194 if ($$self[1]{'default'} and $state ne '_signal')
443 0 122 if ($$self[1]{'trace'})
463 6175 2527 if (ref $$self[2]{$state} eq 'CODE')
502 4863 2980 unless defined $method
510 0 7843 if ($name eq '_signal')
531 6886 957 if ($handler) { }
535 5996 890 if (ref $handler eq 'CODE') { }
890 0 elsif ($handler->can($method)) { }
536 0 5996 if $$self[1]{'debug'} and exists $$self[2]{$name}
549 0 890 if $$self[1]{'debug'} and exists $$self[2]{$name}
562 0 0 if (ref $handler eq 'CODE' and $$self[1]{'trace'}) { }
570 0 0 unless ($handler->can($method))
571 0 0 if (length ref $handler) { }
617 4 0 if (defined $value) { }
622 0 4 if $value =~ /^(on|yes|true)$/i
623 0 4 if $value =~ /^(no|off|false)$/i
639 4 4 if (@_)
641 4 0 exists $$self[1]{$flag} ? :
652 8 0 if (@return_keys == 1) { }
687 15 0 unless (delete $anonevent_weakened{$self})
694 0 0 unless ($anonevent_weakened{$self})
708 0 170 if (exists $INC{'Tk.pm'}) { }