| blib/lib/WWW/Search.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 47 | 76 | 61.8 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 224 | 30 | 5 | 0 | -d $_ and /^[a-z]/ |
| 659 | 6 | 4 | 1 | defined $iArg and $iArg eq '' |
| 662 | 7 | 1 | 3 | defined $iArg and 0 <= $iArg |
| 669 | 0 | 7 | 1 | $self->{'state'} ne 4 and $self->{'state'} ne 3 |
| 806 | 1 | 1 | 1 | defined $desired and 0 <= $desired |
| 965 | 5 | 2 | 5 | 'ARRAY' eq ref $ra && defined $ra->[0] && $ra->[0] ne '' |
| 1030 | 1 | 0 | 1 | $self->is_http_proxy && defined $self->http_proxy_user && $self->http_proxy_user ne '' && defined $self->http_proxy_pwd && $self->http_proxy_pwd ne '' |
| 1118 | 1 | 0 | 0 | ref $ua and not $@ |
| 1263 | 0 | 0 | 0 | $self->{'_http_referer'} and $self->{'_http_referer'} ne '' |
| 1288 | 0 | 0 | 0 | $self->{'search_to_file'} and $response->is_success |
| 1569 | 2 | 0 | 1 | $url ne '' and $base ne '' |
| line | l | !l | condition |
|---|---|---|---|
| 262 | 30 | 5 | &_wanted($sDir) or 'JUNKJUNK' |
| 457 | 1 | 2 | (shift())->_elem('date_from', @_) || '' |
| 462 | 1 | 2 | (shift())->_elem('date_to', @_) || '' |
| 682 | 6 | 2 | $self->{'approx_count'} || 0 |
| 728 | 6 | 0 | $self->{'cache'} ||= [] |
| 886 | 1 | 1 | $text ||= '' |
| 935 | 4 | 1 | $_ ||= '' |
| 1107 | 2 | 2 | $ENV{'WWW_SEARCH_USERAGENT'} || '' |
| 1145 | 4 | 0 | shift() || 0 |
| 1476 | 9 | 0 | shift() || '' |
| 1565 | 2 | 1 | $base ||= '' |
| 1566 | 1 | 2 | $url ||= '' |
| 1619 | 0 | 5 | $self->_native_retrieve_some || 0 |
| 1721 | 0 | 0 | $self->{'_next_to_retrieve'} ||= 1 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 172 | 1 | 1 | 0 | $iVersion ||= $VERSION |
| 189 | 2 | 0 | 0 | $sMaintainer ||= $MAINTAINER |
| 829 | 7 | 0 | 0 | $self->{'response'} ||= 'HTTP::Response'->new(200) |
| 1295 | 0 | 0 | 0 | $response->is_redirect or $response->message =~ /Object moved/i |
| 1724 | 0 | 0 | 0 | 1 < $self->{'_next_to_retrieve'} or $self->need_to_delay |