| line |
true |
false |
branch |
|
68
|
0 |
0 |
if -d $_ |
|
100
|
0 |
4 |
if $verbose & 32 |
|
103
|
0 |
4 |
unless (defined $file) |
|
107
|
0 |
4 |
if $verbose & 32 |
|
117
|
0 |
3 |
unless defined $file_handler |
|
119
|
0 |
3 |
unless $oldurl =~ /^[a-z][a-z0-9-]*:/ |
|
121
|
0 |
3 |
unless ref $index and $index->can('lookup_second') |
|
123
|
0 |
3 |
unless ref($url_to_file) =~ /CODE/ |
|
125
|
0 |
3 |
unless ref($file_handler) =~ /CODE/ |
|
127
|
0 |
3 |
if defined $junk |
|
132
|
3 |
0 |
if (defined $key) { } |
|
133
|
2 |
1 |
if ($recursive) { } |
|
141
|
0 |
1 |
if ($key =~ /^$oldurl/ and not $key eq $oldurl) { } |
|
149
|
0 |
1 |
if defined $key and $key =~ /^$oldurl/ |
|
154
|
0 |
0 |
if $verbose & 16 |
|
158
|
3 |
0 |
unless $no_warn |
|
270
|
0 |
0 |
unless m[^[A-Za-z]+://^[A-Za-z]+/] |