| line |
true |
false |
branch |
|
17
|
0 |
0 |
@_ > 1 ? : |
|
|
0 |
0 |
@_ == 1 && ref $_[0] eq 'HASH' ? : |
|
|
88 |
0 |
@_ == 1 && !ref($_[0]) ? : |
|
31
|
2 |
2 |
ref $cmp ? : |
|
36
|
16 |
96 |
ref $cmp ? : |
|
51
|
2 |
86 |
unless defined eval {
do {
$ret = _parse_template($flags || {})
}
} |
|
60
|
88 |
14 |
if $outer |
|
63
|
108 |
21 |
$outer ? : |
|
|
81 |
48 |
if $outer ? /\G([^{]+)/cg : /\G([^ \t\{\}]+)/cg |
|
65
|
100 |
29 |
unless /\G(?=\{)/cg |
|
71
|
5 |
1 |
unless (ref $parts[$i] or ref $parts[$i + 1]) |
|
75
|
100 |
0 |
if ($_[0]{'compile'}) { } |
|
77
|
20 |
1 |
ref $_ ? : |
|
78
|
82 |
18 |
@parts == 1 && !ref($parts[0]) ? : |
|
85
|
20 |
9 |
if (/\G\{([\w:]+)/cg) |
|
88
|
13 |
7 |
if (/\G[ \t]+/cg) { } |
|
90
|
6 |
8 |
if (/\G(\w+)=/cg) { } |
|
98
|
1 |
6 |
unless /\G\}/cg |
|
100
|
19 |
0 |
if ($_[0]{'compile'}) { } |
|
106
|
6 |
13 |
if (@named_param) { } |
|
119
|
0 |
0 |
@named_param ? : |
|
122
|
7 |
2 |
if /\G\{ [#] ([0-9A-Za-z]+) \}/cgx |
|
123
|
1 |
1 |
if /\G\{\}/cgx |