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