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 |