line |
true |
false |
branch |
44
|
0 |
32 |
unless $url |
45
|
0 |
32 |
if ref $url |
162
|
10 |
30 |
if $stat & 1 |
169
|
0 |
0 |
if (shift())->{'status'} == 0 |
183
|
89 |
116 |
unless @_ |
185
|
66 |
50 |
unless defined $$self{'status'} and $$self{'status'} == $status |
192
|
0 |
32 |
unless @_ |
194
|
32 |
0 |
unless defined $$self{'check-method'} and $$self{'check-method'} == $status |
203
|
0 |
0 |
unless @_ |
205
|
0 |
0 |
unless $set |
206
|
0 |
0 |
if $set |
211
|
0 |
0 |
unless @_ |
213
|
0 |
0 |
unless $set |
214
|
0 |
0 |
if $set |
220
|
0 |
0 |
unless @_ |
222
|
0 |
0 |
unless $set |
223
|
0 |
0 |
if $set |
228
|
0 |
0 |
unless @_ |
230
|
0 |
0 |
unless $set |
231
|
0 |
0 |
if $set |
236
|
0 |
0 |
unless @_ |
238
|
0 |
0 |
unless $set |
239
|
0 |
0 |
if $set |
252
|
0 |
30 |
unless $status |
253
|
29 |
1 |
unless $$self{'status'} & $status |
266
|
0 |
40 |
unless $status |
267
|
0 |
40 |
if $$self{'status'} & $status |
298
|
0 |
0 |
unless @_ |
369
|
0 |
3 |
unless defined $test_time |
371
|
3 |
0 |
unless defined $base |
372
|
0 |
3 |
unless ($base =~ /^[0-9]*[1-9][0-9]*/) |
379
|
1 |
2 |
if ($self->is_damaged) |
380
|
0 |
2 |
if ($self->is_abandoned) |
381
|
0 |
2 |
if ($self->is_broken) |
383
|
2 |
0 |
if ($self->is_disallowed or $self->is_unsupported) |
386
|
0 |
3 |
unless $factor |
389
|
0 |
3 |
wantarray ? : |
417
|
2 |
0 |
unless @_ |
419
|
0 |
0 |
unless $time =~ /^[+-]?\d+$/ |
433
|
0 |
0 |
unless @_ |
435
|
0 |
0 |
unless $time =~ /^[+-]?\d+$/ |
436
|
0 |
0 |
if (not defined $$self{'last_refresh'} && $time < $$self{'last_refresh'}) { } |
440
|
0 |
0 |
if $WWW::Link::verbose & 16 |
456
|
0 |
0 |
unless $redirect_url |
457
|
0 |
0 |
unless $$self{'redirects'} |
464
|
0 |
0 |
if $$redir_list[$i] = $redirect_url |
481
|
0 |
0 |
unless $$self{'fix_suggestions'} |
489
|
0 |
0 |
if $$sugg_list[$i] = $suggestion |
492
|
0 |
0 |
if $count < @$sugg_list |
505
|
0 |
8 |
if @_ or defined $redirects and not ref($redirects) =~ /ARRAY/ |
507
|
8 |
0 |
if defined $redirects |
523
|
0 |
2 |
if @_ |
525
|
2 |
0 |
if (wantarray) |
529
|
2 |
0 |
if defined $redir |
543
|
1 |
1 |
unless ref $redir |
548
|
0 |
1 |
if ($@ and not $@ =~ /Can't locate object method.*header/) |
552
|
1 |
0 |
if (defined $url) |
557
|
0 |
0 |
if $redir->can('as_string') |
559
|
0 |
0 |
if (ref $redir) |
577
|
0 |
0 |
unless @_ |
595
|
0 |
0 |
if $$self{'fix_suggestions'} |
596
|
0 |
0 |
if $$self{'redirects'} |
609
|
100 |
32 |
unless @_ |
657
|
12 |
37 |
if (not $stat & 2) { } |
|
19 |
18 |
elsif (not defined $$self{'last_fail'} or time - $$self{'last_fail'} > $WWW::Link::inter_test_time) { } |
667
|
9 |
40 |
unless $$self{'long_reliability'} |
668
|
9 |
40 |
unless $$self{'short_reliability'} |
680
|
0 |
12 |
if $WWW::Link::verbose & 4 |
688
|
0 |
19 |
if $WWW::Link::verbose & 4 |
692
|
2 |
17 |
if $$self{'breakcount'} == 10 |
694
|
2 |
17 |
if $$self{'breakcount'} == 4 |
715
|
8 |
8 |
unless $$self{'long_reliability'} |
716
|
8 |
8 |
unless $$self{'short_reliability'} |
761
|
0 |
84 |
if defined $$self{'checkcount'} |
848
|
0 |
111 |
unless defined $age |
850
|
0 |
111 |
unless $age =~ /^\d+$/ |
852
|
18 |
0 |
wantarray ? : |
|
18 |
93 |
unless defined $$self{'test_hist'} |
854
|
0 |
93 |
if ($age > 10) |
858
|
3 |
0 |
wantarray ? : |
|
3 |
90 |
if $age > $#{$$self{'test_hist'};} |
860
|
90 |
0 |
wantarray ? : |
881
|
29 |
57 |
if $cookie |