line |
true |
false |
branch |
264
|
220 |
274 |
if ($tpl =~ s/ ( ^
(? .*? )
\x{fddf}
(? $keypat )
(?: (? \= )
(? [^|}\x{fddf}]*) )?
(?: \| (? [^|}\x{fddf}]* )
(?: \| (? [^|}\x{fddf}]* ) )?
)?
\}
(? .* )
$
)
/_interpolate($ctl, {%+});/eosx) { } |
298
|
0 |
494 |
if $ctl->{'trace'} |
301
|
274 |
220 |
if ($prev eq $t) |
307
|
0 |
220 |
if $ctl->{'trace'} |
322
|
7 |
213 |
if ($key =~ /^(.*)\.(-?\d+)$/) |
326
|
68 |
152 |
ref $m eq 'CODE' ? : |
327
|
154 |
66 |
if (defined $t) |
330
|
142 |
12 |
if (UNIVERSAL::isa($val, 'ARRAY')) { } |
|
0 |
12 |
elsif ($inx) { } |
332
|
6 |
136 |
if ($inx) { } |
333
|
4 |
2 |
if ($inx > 0) { } |
334
|
3 |
1 |
if ($inx <= @$val) { } |
356
|
66 |
154 |
if ($i->{'op'}) { } |
|
104 |
50 |
elsif ($val ne '') { } |
358
|
30 |
36 |
if ($i->{'op'} eq '=' and $val eq $test) { } |
368
|
0 |
59 |
($i->{'else'} // '') ne '' ? : |
|
45 |
59 |
($i->{'then'} // '') ne '' ? : |
372
|
19 |
31 |
($i->{'else'} // '') ne '' ? : |