Branch Coverage

blib/lib/RPC/Simple/Factory.pm
Criterion Covered Total %
branch 22 40 55.0


line true false branch
33 0 1 if (ref $_[0]) { }
62 0 1 if ($port =~ /\D/)
64 0 1 unless $port
66 0 1 $timeout ? :
72 0 1 unless defined $$self{'socket'}
75 0 1 unless fcntl $$self{'socket'}, 4, 2048
85 0 1 if (defined $tkTop)
103 0 0 if defined $$self{'tkTop'}
107 0 0 if (defined $$self{'socket'} and $$self{'socket'}->connected)
117 0 24 if defined $$self{'verbose'} and ${$$self{'verbose'};}
160 1 1 if (defined $objectName)
177 2 0 if (defined $val and $val == length $str2) { }
198 0 1 if (eof $fh)
211 0 17 unless defined $line
216 2 15 if ($line =~ /\s*#end$/)
222 2 15 if ($line =~ /\s*#begin$/)
237 0 2 if ($@) { }
1 1 elsif (defined $method) { }
266 0 1 if ($RPC::Simple::Factory::serverPid == 0)
285 1 0 if (defined $RPC::Simple::Factory::serverPid and $RPC::Simple::Factory::serverPid != 0)