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} |