| line |
true |
false |
branch |
|
39
|
0 |
1 |
unless ($self->{'tcp'}) |
|
44
|
0 |
1 |
if $self->error |
|
52
|
0 |
1 |
unless @_ == 2 |
|
54
|
0 |
1 |
unless $as =~ /^as/i |
|
56
|
1 |
0 |
if (my $data = $self->_response) |
|
57
|
1 |
0 |
wantarray ? : |
|
65
|
0 |
0 |
unless @_ == 2 |
|
68
|
0 |
0 |
if (my $data = $self->_response) |
|
69
|
0 |
0 |
wantarray ? : |
|
76
|
0 |
0 |
unless @_ == 2 |
|
78
|
0 |
0 |
unless $as =~ /^as/i |
|
80
|
0 |
0 |
if (my $data = $self->_response) |
|
81
|
0 |
0 |
wantarray ? : |
|
88
|
0 |
1 |
@dbs ? : |
|
95
|
0 |
1 |
unless @_ >= 2 and @_ <= 3 |
|
97
|
1 |
0 |
$expand ? : |
|
99
|
1 |
0 |
if (my $data = $self->_response) |
|
100
|
1 |
0 |
wantarray ? : |
|
106
|
0 |
1 |
unless @_ >= 2 and @_ <= 3 |
|
108
|
1 |
0 |
$expand ? : |
|
110
|
1 |
0 |
if (my $data = $self->_response) |
|
111
|
1 |
0 |
wantarray ? : |
|
118
|
0 |
1 |
unless @_ == 3 |
|
150
|
0 |
2 |
unless @_ >= 2 and @_ <= 3 |
|
152
|
2 |
0 |
$specific ? : |
|
155
|
1 |
1 |
if $response |
|
156
|
1 |
1 |
if $response |
|
162
|
0 |
0 |
@sources ? : |
|
165
|
0 |
0 |
if $response |
|
166
|
0 |
0 |
wantarray ? : |
|
171
|
0 |
0 |
unless @_ == 4 |
|
173
|
0 |
0 |
unless $action eq "ADD" or $action eq "DEL" |
|
184
|
0 |
9 |
unless (defined $header) |
|
188
|
2 |
7 |
if $header =~ /^[CDEF].*$/ |
|
195
|
0 |
7 |
if $data_length != length $data |