| line |
true |
false |
branch |
|
85
|
0 |
208 |
unless @_ == 2 |
|
116
|
0 |
211 |
unless @_ == 2 or @_ == 3 |
|
139
|
111 |
313 |
if (defined $6) { } |
|
145
|
232 |
81 |
if length $1 |
|
147
|
60 |
253 |
if (defined $2) { } |
|
154
|
27 |
33 |
if ($is_uri) { } |
|
166
|
4 |
29 |
if ($has_uri) { } |
|
203
|
265 |
15 |
if (my $uri = $self->_is_uri(\$orig_match)) { } |
|
248
|
0 |
211 |
unless @_ == 1 |
|
271
|
0 |
313 |
unless @_ == 1 |
|
288
|
0 |
219 |
unless @_ == 1 |
|
302
|
0 |
2 |
unless @_ == 1 |
|
328
|
0 |
280 |
unless @_ == 2 |
|
334
|
63 |
217 |
if ($orig_match =~ s/([\Q$cruftSet\E]+)$//) |
|
338
|
1 |
62 |
if ($cruft =~ /^;/ and $orig_match =~ /\&(\#[1-9]\d{1,3}|[a-zA-Z]{2,8})$/) |
|
347
|
50 |
13 |
if $cruft |
|
361
|
18 |
297 |
if ($$cruft =~ /\Q$close\E$/ and $open_count == $close_count + 1) |
|
383
|
0 |
280 |
unless @_ == 2 |
|
400
|
0 |
42 |
unless @_ == 2 |
|
403
|
36 |
6 |
unless $uri_cand =~ s[^()ftp\.][$1ftp://ftp.] |
|
419
|
0 |
2 |
unless @_ == 2 |
|
435
|
0 |
0 |
@_ ? : |
|
436
|
0 |
0 |
@_ ? : |
|
452
|
0 |
64 |
unless @_ == 2 |
|
513
|
0 |
280 |
unless @_ == 2 |
|
519
|
42 |
238 |
if $uri =~ $self->schemeless_uri_re and not $uri =~ /^$schemeRe:/ |
|
533
|
15 |
265 |
if $has_invalid_scheme or $is_empty |
|
536
|
15 |
265 |
if ($@ or not defined $uri) { } |