| line |
true |
false |
branch |
|
211
|
0 |
66 |
unless ref $callback eq 'CODE' |
|
227
|
2 |
0 |
if (/.*?\R\.\h*(?=\R|\z)/cgsu) { } |
|
236
|
0 |
0 |
if (/\G(.)/cgsu) |
|
245
|
3 |
0 |
if (/\G.*?\R\Q$token\E(?=\R|\z)/cgsu) |
|
259
|
0 |
0 |
unless /\G.*?\R=cut\h*(?=\R|\z)/cgsu |
|
283
|
2 |
20 |
/\G(?=\s*\{)/u ? : |
|
297
|
0 |
0 |
/\G(?
|
|
309
|
21 |
0 |
unless /\G$bracket_var/ou |
|
317
|
1 |
0 |
unless /\G$bracket_var/ou |
|
325
|
0 |
0 |
unless /\G$bracket_var/ou |
|
333
|
0 |
0 |
unless /\G$bracket_var/ou |
|
341
|
0 |
0 |
unless /\G$bracket_var/ou |
|
415
|
0 |
5 |
$is_bare_word ? : |
|
417
|
0 |
5 |
if ($name eq 'sub' and not $is_bare_word) { } |
|
432
|
3 |
231 |
$flat == 1 && /\G(?=[a-z]+\h*\})/u || /\G((?<=\{)|(?<=\{\h))(?=[a-z]+\h*\})/u ? : |
|
539
|
0 |
1 |
$is_bare_word ? : |
|
540
|
0 |
1 |
if ($is_bare_word) { } |
|
572
|
2 |
14 |
if ($format) |
|
573
|
2 |
0 |
if (substr($_, $-[0], $+[0] - $-[0]) eq '=') |
|
592
|
5 |
45 |
if (substr($_, $-[0], $+[0] - $-[0]) =~ /^$postfix_operators\z/u) { } |
|
629
|
0 |
4 |
$proto == 1 ? : |
|
639
|
0 |
0 |
if (/\G(.)/cgsu) |