line |
true |
false |
branch |
84
|
2 |
3 |
unless defined $host |
85
|
4 |
1 |
unless defined $port |
93
|
2 |
3 |
if (ref $host eq 'ARRAY') { } |
98
|
2 |
1 |
if (defined $addr_proto) { } |
101
|
2 |
0 |
unless (exists $protos{$addr_proto}) |
117
|
0 |
3 |
unless my $sock = 'IO::Socket::INET'->new('PeerAddr', $conn->[0], 'PeerPort', $conn->[1], 'Proto', $conn->[2]) |
123
|
3 |
0 |
if defined $sock |
126
|
0 |
3 |
unless @sockets |
172
|
2 |
3 |
unless defined $delta |
174
|
1 |
4 |
if (ref $stats eq 'ARRAY') { } |
193
|
1 |
2 |
unless defined $sample_rate |
196
|
1 |
2 |
if (defined $sample_rate and $sample_rate < 1) { } |
198
|
0 |
1 |
if rand() <= $sample_rate |
205
|
1 |
2 |
unless keys %$sampled_data |