line |
true |
false |
branch |
30
|
0 |
5 |
unless ($qdata and ref($qdata) =~ /HASH/i) |
33
|
2 |
3 |
if (exists $qdata->{'WebEnv'}) |
39
|
5 |
0 |
exists $TYPE{$eutil} ? : |
43
|
1 |
0 |
if ($key eq 'eGQueryResult' and exists $qdata->{$key}{'ResultItem'}) |
53
|
2 |
0 |
if ($key eq 'IdList' and exists $qdata->{'IdList'}{'Id'}) |
58
|
2 |
0 |
if ($key eq 'TranslationSet' and exists $qdata->{'TranslationSet'}{'Translation'}) |
63
|
1 |
20 |
if ref $qdata->{$key} eq 'HASH' and not keys %{$$qdata{$key};} |
79
|
0 |
0 |
if ($self->eutil eq 'esearch') |
87
|
0 |
0 |
if ($self->eutil eq 'espell') |