| line |
true |
false |
branch |
|
74
|
1 |
4 |
if (defined $opts{'re'}) { } |
|
80
|
0 |
4 |
unless $re_class->require |
|
81
|
0 |
4 |
unless $re_class->can('uri_re') |
|
82
|
0 |
4 |
unless $re_class->can('schemeless_uri_re') |
|
114
|
0 |
14 |
unless defined $$self{'_remain'} |
|
121
|
5 |
9 |
unless defined $1 |
|
138
|
1 |
8 |
unless $clean_match =~ /^$scheme_re:/ |
|
145
|
9 |
0 |
if (not $@ and defined $uri) |
|
158
|
1 |
0 |
unless $uri_cand =~ s[^()ftp\.][$1ftp://ftp.] |
|
172
|
0 |
9 |
if ($orig_match =~ s/([$cruft_set]+)$//) |
|
192
|
0 |
3 |
unless defined $$self{'_match'} |
|
216
|
5 |
9 |
unless defined $$self{'_match'} |