Branch Coverage

blib/lib/Alien/Taco/Server.pm
Criterion Covered Total %
branch 18 52 34.6


line true false branch
112 0 0 unless defined $message
117 0 0 if (not $act =~ /^_/ and $self->can($act)) { }
120 0 0 unless defined $res
147 5 5 if (defined $$message{'args'})
151 5 5 if (defined $$message{'kwargs'})
179 3 0 if blessed $x
230 0 1 if (not defined $$message{'context'} && $$message{'context'} ne 'scalar') { }
0 1 elsif ($$message{'context'} eq 'list') { }
0 1 elsif ($$message{'context'} eq 'map') { }
1 0 elsif ($$message{'context'} eq 'void') { }
277 1 0 if (not defined $$message{'context'} && $$message{'context'} ne 'scalar') { }
0 0 elsif ($$message{'context'} eq 'list') { }
0 0 elsif ($$message{'context'} eq 'map') { }
0 0 elsif ($$message{'context'} eq 'void') { }
316 0 2 if (not defined $$message{'context'} && $$message{'context'} ne 'scalar') { }
1 1 elsif ($$message{'context'} eq 'list') { }
1 0 elsif ($$message{'context'} eq 'map') { }
0 0 elsif ($$message{'context'} eq 'void') { }
388 0 1 unless $object->isa('HASH')
407 1 0 if ($name =~ s/^\$//) { }
0 0 elsif ($name =~ s/^\@//) { }
0 0 elsif ($name =~ s/^\%//) { }
461 0 1 unless $object->isa('HASH')
483 1 0 if ($name =~ s/^\$//) { }
0 0 elsif ($name =~ s/^\@//) { }
0 0 elsif ($name =~ s/^\%//) { }