blib/lib/WebService/Blekko.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 15 | 43 | 34.8 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
214 | 0 | 0 | 0 | defined $$answer{'status'} and $$answer{'status'} |
273 | 0 | 0 | 0 | defined $$answer{'username'} and $$answer{'username'} |
309 | 0 | 0 | 0 | defined $urls and ref $urls ne 'ARRAY' |
401 | 0 | 0 | 0 | defined $urls and ref $urls ne 'ARRAY' |
520 | 0 | 0 | 7 | $ret and ref $ret eq 'HASH' |
line | l | !l | condition |
---|---|---|---|
89 | 3 | 2 | delete $opts{'server'} || 'blekko.com' |
90 | 5 | 0 | delete $opts{'auth'} || die('Must specify auth in opts') |
96 | 1 | 4 | delete $opts{'qps'} || 1 |
102 | 0 | 5 | $opts{'max_redirect'} ||= 0 |
477 | 10 | 0 | $$self{'qps'} || 1 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
92 | 0 | 5 | 0 | delete $opts{'source'} || $useragent |
95 | 3 | 0 | 2 | delete $opts{'scheme'} || ($https_available ? 'https' : 'http') |
99 | 0 | 5 | 0 | $opts{'agent'} || $useragent |
114 | 0 | 0 | 5 | defined $cjf or defined $cj |
379 | 0 | 0 | 0 | substr($resp->content, 0, 1) eq '<' or substr($resp->content, 0, 6) eq 'Error:' |
516 | 1 | 0 | 7 | not defined $string or $string eq '' |