| line |
true |
false |
branch |
|
34
|
0 |
1 |
if defined $self->addr and defined $self->port |
|
44
|
0 |
1 |
if (@_) |
|
54
|
1 |
4 |
if (@_) |
|
65
|
1 |
3 |
if (@_) |
|
84
|
1 |
0 |
if (defined $self->addr and defined $self->port) { } |
|
86
|
0 |
1 |
unless $$self{'SOCK'} = 'IO::Socket::INET'->new('PeerAddr', $self->addr, 'PeerPort', $self->port, 'Type', 2, 'Proto', 'udp') |
|
110
|
0 |
0 |
if (defined $$self{'SOCK'}) { } |
|
112
|
0 |
0 |
if $bs <= 0 |
|
113
|
0 |
0 |
if $$self{'DEBUG'} and $bs |
|
129
|
0 |
0 |
if (defined $$self{'SOCK'}) { } |
|
130
|
0 |
0 |
if ($recv_size > 0) |
|
139
|
0 |
0 |
if ($@) |
|
140
|
0 |
0 |
if ($@ =~ /timeout/) { } |
|
153
|
0 |
0 |
if $$self{'DEBUG'} |
|
166
|
0 |
0 |
if $$self{'DEBUG'} |
|
175
|
0 |
0 |
if (defined $value) { } |
|
180
|
0 |
0 |
if $$self{'DEBUG'} |
|
200
|
0 |
0 |
if (defined $result) { } |
|
202
|
0 |
0 |
if (defined $data) { } |
|
222
|
0 |
0 |
if /^A/ |
|
223
|
0 |
0 |
if (/^(\d+)\\/) |
|
226
|
0 |
0 |
if (/[\\\d]*\\(.+)$/) |
|
229
|
0 |
0 |
if defined $key |
|
230
|
0 |
0 |
if $$self{'DEBUG'} |
|
239
|
0 |
0 |
if $$self{'DEBUG'} |