| line |
true |
false |
branch |
|
48
|
1 |
8 |
unless @_ > 1 |
|
51
|
1 |
7 |
unless int(@_) % 2 == 0 |
|
58
|
1 |
6 |
unless defined $host |
|
67
|
4 |
20 |
exists $inargs{$arg} ? : |
|
71
|
1 |
5 |
if (keys %inargs > 0) |
|
85
|
1 |
4 |
unless defined $self |
|
92
|
0 |
4 |
if ($self->response != 2) |
|
115
|
1 |
1 |
unless @_ == 1 |
|
131
|
0 |
1 |
unless @_ == 1 |
|
134
|
0 |
1 |
unless $self->_SHOW_SERVER |
|
143
|
2 |
2 |
unless @_ == 2 |
|
146
|
1 |
1 |
if ($self->_SHOW_INFO(@_)) { } |
|
156
|
2 |
3 |
unless @_ == 2 |
|
162
|
1 |
2 |
if (exists do {
${*$self;}{'net_dict_dbs'}
}->{$dbname}) { } |
|
166
|
1 |
1 |
if $self->debug |
|
173
|
0 |
2 |
unless @_ == 1 |
|
176
|
0 |
2 |
unless $self->_SHOW_STRAT |
|
190
|
1 |
13 |
unless @_ >= 2 |
|
193
|
10 |
3 |
@_ > 0 ? : |
|
194
|
1 |
12 |
unless @dbs |
|
202
|
2 |
10 |
if (not defined $word or $word eq '') |
|
208
|
2 |
8 |
unless $self->_DEFINE($db, $word) |
|
224
|
2 |
9 |
unless @_ >= 3 |
|
228
|
6 |
3 |
@_ > 0 ? : |
|
229
|
0 |
9 |
unless @dbs |
|
236
|
2 |
7 |
if (not defined $word or $word eq '') |
|
242
|
0 |
7 |
unless $self->_MATCH($db, $strat, $word) |
|
257
|
0 |
0 |
unless @_ == 3 |
|
270
|
0 |
0 |
if ($self->_AUTH($user, $auth_string)) { } |
|
279
|
0 |
0 |
if $self->debug |
|
286
|
1 |
1 |
unless @_ == 1 |
|
291
|
0 |
1 |
unless $self->_STATUS |
|
299
|
1 |
4 |
unless @_ == 1 |
|
308
|
2 |
3 |
unless @_ == 2 |
|
318
|
1 |
1 |
unless @_ == 1 |
|
353
|
1 |
1 |
if (defined fileno $self) |
|
364
|
0 |
33 |
if ($self->debug) |
|
389
|
408 |
0 |
if ($string =~ /^"/) |
|
417
|
4 |
0 |
if ($banner =~ /^(\d{3}) (.*) (<[^<>]*>)?\s+(<[^<>]+>)\s*$/) { } |
|
420
|
4 |
0 |
if (length $capstring > 0) |
|
425
|
0 |
0 |
if $self->debug |
|
448
|
3 |
1 |
if exists do {
*$self
}->{'net_dict_dbs'} |
|
450
|
1 |
0 |
if ($self->_SHOW_DB) |