Branch Coverage

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


line true false branch
45 0 169 if defined *{"ASSERT_$name";}{'CODE'}
46 0 169 if (defined *{"POE::Kernel::ASSERT_$name";}{'CODE'}) { }
52 0 0 if $@
56 0 169 if $@
68 0 169 if defined *{"TRACE_$name";}{'CODE'}
69 0 169 if (defined *{"POE::Kernel::TRACE_$name";}{'CODE'}) { }
75 0 0 if $@
79 0 169 if $@
90 169 0 unless (defined &ASSERT_DEFAULT)
91 169 0 if (defined &POE::Kernel::ASSERT_DEFAULT) { }
103 169 0 unless (defined &TRACE_DEFAULT)
104 169 0 if (defined &POE::Kernel::TRACE_DEFAULT) { }
169 0 787 unless defined $POE::Kernel::poe_kernel
191 787 0 if (exists $$self[2]{'_start'}) { }
217 2 787 if (@params & 1)
228 347 440 if (exists $params{'args'})
229 347 0 if (ref $params{'args'} eq 'ARRAY') { }
240 4 783 if (exists $params{'options'})
241 4 0 if (ref $params{'options'} eq 'HASH') { }
256 680 485 if ($param_name eq 'inline_states') { }
200 285 elsif ($param_name eq 'package_states') { }
104 181 elsif ($param_name eq 'object_states') { }
181 0 elsif ($param_name eq 'heap') { }
257 0 680 unless ref $param_value eq 'HASH'
261 0 4709 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 8688 if ($$self[1]{'trace'})
420 316 8380 unless (exists $$self[2]{$state})
426 194 122 unless (exists $$self[2]{'_default'})
427 194 0 exists &Errno::ENOSYS ? :
428 1 193 if ($$self[1]{'default'} and $state ne '_signal')
443 0 122 if ($$self[1]{'trace'})
463 5975 2527 if (ref $$self[2]{$state} eq 'CODE')
502 4709 2916 unless defined $method
510 0 7625 if ($name eq '_signal')
531 6700 925 if ($handler) { }
535 5810 890 if (ref $handler eq 'CODE') { }
890 0 elsif ($handler->can($method)) { }
536 0 5810 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 169 if (exists $INC{'Tk.pm'}) { }