line |
true |
false |
branch |
84
|
1 |
1 |
if (defined $_[1]) |
89
|
1 |
1 |
unless (defined $args{'pids'}) |
92
|
0 |
1 |
if (ref \$args{'pids'} eq 'ARRAY') |
95
|
0 |
1 |
unless (defined $args{'pids'}[0]) |
125
|
1 |
4 |
unless (defined $object) |
129
|
1 |
3 |
if (ref $object ne 'Net::Connection') |
137
|
0 |
3 |
unless (defined $conn_pid) |
145
|
1 |
4 |
if ($pid =~ /^[0-9]+$/ and $pid eq $conn_pid) { } |
|
0 |
4 |
elsif ($pid =~ /^\<\=[0-9]+$/) { } |
|
0 |
4 |
elsif ($pid =~ /^\<[0-9]+$/) { } |
|
0 |
4 |
elsif ($pid =~ /^\>\=[0-9]+$/) { } |
|
2 |
2 |
elsif ($pid =~ /^\>[0-9]+$/) { } |
152
|
0 |
0 |
if ($conn_pid <= $pid) |
157
|
0 |
0 |
if ($conn_pid < $pid) |
162
|
0 |
0 |
if ($conn_pid >= $pid) |
167
|
1 |
1 |
if ($conn_pid > $pid) |