line |
true |
false |
branch |
43
|
0 |
0 |
if $constname eq 'constant' |
44
|
0 |
0 |
@_ ? : |
45
|
0 |
0 |
if ($! != 0) |
46
|
0 |
0 |
if ($! =~ /Invalid/ or $!{'EINVAL'}) { } |
57
|
0 |
0 |
if ($] >= 5.00561) { } |
76
|
0 |
0 |
unless defined $$self{'HOST'} |
77
|
0 |
0 |
unless defined $$self{'PORT'} |
79
|
0 |
0 |
unless (defined $$self{'USER'}) |
80
|
0 |
0 |
defined $ENV{'USER'} ? : |
83
|
0 |
0 |
unless (defined $$self{'HOSTNAME'}) |
84
|
0 |
0 |
defined $ENV{'HOSTNAME'} ? : |
87
|
0 |
0 |
defined $$self{'TIMEOUT'} ? : |
95
|
0 |
0 |
unless defined $obj |
98
|
0 |
0 |
exists $$self{'DEBUG'} ? : |
100
|
0 |
0 |
unless ($obj->response == CMD_OK()) |
113
|
0 |
0 |
unless ($obj->response == CMD_OK()) |
125
|
0 |
0 |
if (scalar @_ == 2) { } |
128
|
0 |
0 |
if (scalar(@_) % 2 == 0) { } |
129
|
0 |
0 |
if ($_[0] =~ /^CATEGORY$/i or $_[0] =~ /^ID$/i) { } |
143
|
0 |
0 |
$self->_READ($cat, $id) ? : |
144
|
0 |
0 |
unless defined $data |
158
|
0 |
0 |
$self->_QUERY(@_) ? : |
163
|
0 |
0 |
$self->_SITES ? : |
169
|
0 |
0 |
if (ref $self ne 'Net::FreeDB') { } |
175
|
0 |
0 |
if ($id eq 'UNDEF' or $id eq '') |
185
|
0 |
0 |
if (ref $self ne 'Net::FreeDB') { } |
191
|
0 |
0 |
unless ($data) |
214
|
0 |
0 |
unless my $data = $self->read_until_dot |
224
|
0 |
0 |
if ($code == 210 or $code == 211) { } |
227
|
0 |
0 |
unless my $data = $self->read_until_dot |
230
|
0 |
0 |
if $i =~ /^\.$/ |
245
|
0 |
0 |
unless my $data = $self->read_until_dot |