| line |
true |
false |
branch |
|
84
|
0 |
0 |
if (not ref $expected) { } |
|
|
0 |
0 |
elsif (ref $expected eq 'HASH') { } |
|
|
0 |
0 |
elsif (ref $expected eq 'ARRAY') { } |
|
93
|
0 |
0 |
if ref $res ne 'ARRAY' |
|
106
|
0 |
0 |
if ($^O eq 'MSWin32') { } |
|
114
|
0 |
0 |
if $LISTEN |
|
116
|
0 |
0 |
!$PORT ? : |
|
124
|
0 |
0 |
unless $LISTEN |
|
131
|
0 |
0 |
unless $LISTEN |
|
136
|
0 |
0 |
if $LISTEN |
|
139
|
0 |
0 |
unless ($path) |
|
142
|
0 |
0 |
if (length $path >= 90) |
|
147
|
0 |
0 |
if -S $path |
|
148
|
0 |
0 |
if -e $path |
|
157
|
0 |
0 |
unless $LISTEN |
|
173
|
0 |
0 |
unless $conn |
|
176
|
0 |
0 |
if ($reject) |
|
189
|
0 |
0 |
if $INIT->appid != $pid or $INIT->language ne 'Perl' |
|
199
|
0 |
0 |
if $res and $res->transaction_id != $SEQ |