| blib/lib/WWW/Search.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 45 | 74 | 60.8 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 223 | 16 | 4 | 0 | -d $_ and /^[a-z]/ |
| 665 | 8 | 5 | 1 | defined $iArg and $iArg eq '' |
| 668 | 9 | 1 | 4 | defined $iArg and 0 <= $iArg |
| 675 | 0 | 8 | 2 | $self->{'state'} ne 4 and $self->{'state'} ne 3 |
| 812 | 1 | 1 | 1 | defined $desired and 0 <= $desired |
| 971 | 5 | 2 | 5 | 'ARRAY' eq ref $ra && defined $ra->[0] && $ra->[0] ne '' |
| 1035 | 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 '' |
| 1123 | 1 | 0 | 0 | ref $ua and not $@ |
| 1268 | 0 | 0 | 0 | $self->{'_http_referer'} and $self->{'_http_referer'} ne '' |
| 1293 | 0 | 0 | 0 | $self->{'search_to_file'} and $response->is_success |
| 1574 | 2 | 0 | 1 | $url ne '' and $base ne '' |
| line | l | !l | condition |
|---|---|---|---|
| 261 | 16 | 4 | &_wanted($sDir) or 'JUNKJUNK' |
| 456 | 1 | 2 | (shift())->_elem('date_from', @_) || '' |
| 461 | 1 | 2 | (shift())->_elem('date_to', @_) || '' |
| 734 | 6 | 0 | $self->{'cache'} ||= [] |
| 892 | 1 | 1 | $text ||= '' |
| 941 | 4 | 1 | $_ ||= '' |
| 1112 | 2 | 2 | $ENV{'WWW_SEARCH_USERAGENT'} || '' |
| 1150 | 4 | 0 | shift() || 0 |
| 1481 | 9 | 0 | shift() || '' |
| 1570 | 2 | 1 | $base ||= '' |
| 1571 | 1 | 2 | $url ||= '' |
| 1624 | 0 | 5 | $self->_native_retrieve_some || 0 |
| 1726 | 0 | 0 | $self->{'_next_to_retrieve'} ||= 1 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 171 | 1 | 1 | 0 | $iVersion ||= $VERSION |
| 188 | 2 | 0 | 0 | $sMaintainer ||= $MAINTAINER |
| 835 | 7 | 0 | 0 | $self->{'response'} ||= 'HTTP::Response'->new(200) |
| 1300 | 0 | 0 | 0 | $response->is_redirect or $response->message =~ /Object moved/i |
| 1729 | 0 | 0 | 0 | 1 < $self->{'_next_to_retrieve'} or $self->need_to_delay |