Condition Coverage

blib/lib/Patro/Server.pm
Criterion Covered Total %
condition 49 106 46.2


and 3 conditions

line !l l&&!r l&&r condition
59 59 0 0 $threads_avail && 'threads'->tid
102 0 0 12 $ref ne 'CODE' and $ref ne 'CODE*'
0 0 12 $ref ne 'CODE' and $ref ne 'CODE*' and $ref ne 'GLOB'
202 3 0 13 $ops{'<'} and $ops{'neg'}
251 3 0 0 not defined $file || ref $self and $self ne 'Patro::Config'
347 62 0 24 (my $pid = waitpid(-1, 1)) > 0 and WIFEXITED($?)
480 3 430 40 @r and ref $r[0] eq '.Patroclus'
504 417 16 389 $j < @$args and not $Patro::Server::SIDES->{'no_out'}
517 19 13 387 $ctx == 1 and defined $r[0]
746 2 0 0 $command eq 'READ?' and fileno $fh >= 0
927 0 0 32 @_ > 0 and ref $_[-1] eq '.Patroclus'

or 2 conditions

line l !l condition
29 59 0 ($ENV{'HOSTNAME'} // `hostname`) // 'localhost'
280 84 0 $OPTS{'fincheck_freq'} || 5
376 62 0 $OPTS{'fincheck_freq'} || 5
455 0 473 $DEBUG || $request->{'_debug'} || 0
722 0 0 $args->[1] // undef
0 0 $args->[2] // undef
748 1 0 $off || 0
752 2 0 $off || 0

or 3 conditions

line l !l&&r !l&&!r condition
29 59 0 0 $ENV{'HOSTNAME'} // `hostname`
187 13 0 3 $ops{'0+'} or $ops{'""'}
0 3 0 $ops{'0+'} or $ops{'""'} or $ops{'bool'}
251 3 0 0 defined $file || ref $self
286 0 0 0 $!{'ECHILD'} or $! == 10
599 0 0 28 $cmd eq 'STORESIZE' or $cmd eq 'EXTEND'
622 0 2 14 not defined $len or $len eq 'undef'
705 2 0 33 $command eq 'READ' or $command eq 'READ?'
2 1 32 $command eq 'READ' or $command eq 'READ?' or $command eq 'SYSREAD'
746 1 0 2 $command eq 'SYSREAD' or $command eq 'READ?' and fileno $fh >= 0
875 0 0 12 $op eq '!' or $op eq '~'
0 0 12 $op eq '!' or $op eq '~' or $op eq '++'
0 0 12 $op eq '!' or $op eq '~' or $op eq '++' or $op eq '--'
0 0 12 $op eq 'cos' or $op eq 'sin'
0 0 12 $op eq 'cos' or $op eq 'sin' or $op eq 'exp'
0 0 12 $op eq 'cos' or $op eq 'sin' or $op eq 'exp' or $op eq 'abs'
0 0 12 $op eq 'cos' or $op eq 'sin' or $op eq 'exp' or $op eq 'abs' or $op eq 'int'
0 0 12 $op eq 'cos' or $op eq 'sin' or $op eq 'exp' or $op eq 'abs' or $op eq 'int' or $op eq 'sqrt'
0 0 12 $op eq 'cos' or $op eq 'sin' or $op eq 'exp' or $op eq 'abs' or $op eq 'int' or $op eq 'sqrt' or $op eq 'log'