Branch Coverage

blib/lib/WWW/Spyder.pm
Criterion Covered Total %
branch 0 260 0.0


line true false branch
39 0 0 if (@_ == 1)
51 0 0 unless @_ % 2
54 0 0 if $arg{'UA'}
58 0 0 if $arg{'image_checking'}
62 0 0 if $arg{'report_broken_links'}
72 0 0 if (ref $_methods{$method} eq 'ARRAY') { }
75 0 0 unless @args
81 0 0 if $arg and exists $$self{$attribute}
83 0 0 if exists $$self{$attribute}
91 0 0 if $seed
93 0 0 unless $self->can('_exit_check')
102 0 0 if (@terms and not exists $$self{'_terms'}) { }
119 0 0 if $time
120 0 0 unless $time
125 0 0 unless $url
126 0 0 if ref $url
146 0 0 if (ref $$opts{'exclude'} eq 'ARRAY')
152 0 0 if $self->_exit_check
159 0 0 if ($$self{'report_broken_links'} or $$self{'image_checking'}) { }
171 0 0 if $url =~ /$_/
172 0 0 if $skip_url
177 0 0 if $VERBOSITY
182 0 0 if $self->bell
184 0 0 unless $response
190 0 0 if $$self{'_courtesy_Queue'} and @{$$self{'_courtesy_Queue'};} > 100
193 0 0 unless $head
197 0 0 if length $head > 1024
199 0 0 if $VERBOSITY > 2
203 0 0 unless $base
216 0 0 if ($$self{'image_checking'}) { }
217 0 0 if ($head =~ /Content\-Type:\s*image/i)
220 0 0 if ($img_size <= 0) { }
228 0 0 unless lc($head) =~ /content-type:\s?(?:text|html)/
233 0 0 unless $title
236 0 0 unless $description
242 0 0 if ($title and $$self{'report_broken_links'})
243 0 0 if $title =~ /^\s*404\s+Not\s+Found\s*$/
247 0 0 if $description
249 0 0 unless my $page = $response->content
260 0 0 if $$self{'_page_Memory'}{$digest}++ and carp("Seen this page's content before: $url")
265 0 0 if $VERBOSITY > 1
270 0 0 if $self->terms
284 0 0 if $self->_links
287 0 0 if ($$self{'_text'} and ${$$self{'_text'};})
317 0 0 if @urls and $VERBOSITY > 5
320 0 0 if ($self->terms and not @urls) { }
0 0 elsif (@urls > 0) { }
326 0 0 if $self->_seen($url)
336 0 0 unless $match
339 0 0 if ($VERBOSITY > 1)
347 0 0 if $queue_index > 4
348 0 0 if $queue_index < 0
350 0 0 if ($VERBOSITY > 2)
358 0 0 if $self->_seen($url)
360 0 0 if $VERBOSITY > 2
369 0 0 if $self->_seen($url)
380 0 0 unless ref $$self{$Q} eq 'ARRAY'
390 0 0 if $raw
398 0 0 $day == 1 ? :
404 0 0 if $bytes
406 0 0 unless $$self{'_bytes_GOT'}
420 0 0 wantarray ? :
462 0 0 unless $verbosity
485 0 0 if $enQ
491 0 0 if $enQ
509 0 0 unless $$self{'_text'}
520 0 0 if $VERBOSITY > 1
523 0 0 if $index > 25
524 0 0 if $index > 18
525 0 0 if $index > 14
526 0 0 if $index > 11
527 0 0 if $index > 7
528 0 0 if $index > 3
529 0 0 if $index > 0
544 0 0 unless $tag =~ /^(?:a|img)$/ or $$self{'image_checking'}
548 0 0 if $$self{'image_checking'}
549 0 0 if lc($$attr{'href'}) =~ /^\s*mailto:/
550 0 0 if lc($$attr{'href'}) =~ /^\s*file:/
551 0 0 if lc($$attr{'href'}) =~ /javascript:/
553 0 0 if $$self{'image_checking'}
560 0 0 if ($$attr{'src'} and $$self{'image_checking'} and not $$attr{'href'})
567 0 0 if $$self{'_src'} and $$self{'image_checking'}
581 0 0 unless my $it = shift()
582 0 0 if $it =~ /(?:\<\!\-\-)|(?:\-\-\>)/
585 0 0 if $$self{'_linkSwitch'}
593 0 0 if ($$self{'image_checking'}) { }
594 0 0 unless $tag eq 'a' or $$self{'_linkSwitch'} or $tag eq 'img'
597 0 0 unless $tag eq 'a' or $$self{'_linkSwitch'}
606 0 0 if $$self{'_src'} and $$self{'image_checking'}
627 0 0 if ($$self{'UA'}) { }
640 0 0 if ($$self{'UA'}) { }
659 0 0 unless (ref $arg and ref $$arg{'exit_on'} eq 'HASH')
662 0 0 unless $self->queue_count
673 0 0 if ($$arg{'exit_on'}{'pages'})
674 0 0 if $VERBOSITY > 1
680 0 0 if ($$arg{'exit_on'}{'success'})
684 0 0 if ($$arg{'exit_on'}{'time'})
685 0 0 if $VERBOSITY > 1
698 0 0 unless exists $times{$unit}
719 0 0 if $VERBOSITY > 1
721 0 0 if $VERBOSITY > 2
722 0 0 unless $$self{$Q} and @{$$self{$Q};} > 0
731 0 0 if $seen{$url}++
734 0 0 unless $self->_courtesy_call($enQ)
741 0 0 unless $switch
749 0 0 if $VERBOSITY > 1
753 0 0 unless ref $$self{$Q} eq 'ARRAY'
758 0 0 if ($VERBOSITY > 4)
760 0 0 if $$self{'_courtesy_Queue'}
765 0 0 if ($VERBOSITY)
766 0 0 $sleep == 1 ? :
768 0 0 $tax == 1 ? :
778 0 0 unless $enQ
781 0 0 if $VERBOSITY > 5
787 0 0 if $seen > 10
793 0 0 wantarray ? :
798 0 0 if ref $_[0]
801 0 0 wantarray ? :
825 0 0 if ref $url
826 0 0 unless $url
827 0 0 if (length $url > 512)
830 0 0 if ($name and length $name > 512)
833 0 0 unless $name
875 0 0 if (ref $val eq 'ARRAY') { }
878 0 0 unless $arg
885 0 0 if (not $arg and exists $$self{$attribute})
887 0 0 ref $$self{$attribute} eq 'SCALAR' ? :
889 0 0 if $arg
929 0 0 unless exists $_domains{$what}
960 0 0 unless exists $engine_url{lc $engine}