line |
true |
false |
branch |
20
|
0 |
8 |
if (($flag || '') =~ /^\-extends/i) |
23
|
0 |
0 |
if ($caller->can('meta')) { } |
43
|
15 |
14 |
unless defined $value |
45
|
3 |
26 |
if ($value =~ m[^/]) { } |
|
11 |
15 |
elsif (length $value) { } |
69
|
0 |
22 |
if (defined $value and not $value =~ /^\d+$/) |
80
|
0 |
0 |
if ($value) |
96
|
0 |
1 |
unless ($value =~ s/^\^//) |
99
|
1 |
0 |
if length $prefix |
107
|
18 |
0 |
if (defined $value and length $value) { } |
108
|
0 |
18 |
if ($value eq '.') { } |
|
4 |
14 |
elsif (my($rel, $rest) = $value =~ m[^((?:\.{2}/)+)(.*)$]) { } |
|
12 |
2 |
elsif (not $value =~ m[^/]) { } |
120
|
11 |
1 |
if ($action_ns) { } |