| line |
true |
false |
branch |
|
12
|
12 |
2 |
unless $PREFIX
|
|
46
|
14 |
0 |
if (((caller 0)[3] // '') =~ /\b(?:un)?import\Z/)
|
|
49
|
14 |
0 |
if (((caller 0)[3] // '') =~ /\b(?:un)?import\Z/)
|
|
53
|
14 |
0 |
if (((caller 0)[3] // '') =~ /\b(?:un)?import\Z/)
|
|
56
|
14 |
0 |
if (((caller 0)[3] // '') =~ /\b(?:un)?import\Z/)
|
|
60
|
14 |
0 |
if (((caller 0)[3] // '') =~ /\b(?:un)?import\Z/)
|
|
64
|
14 |
0 |
if (((caller 0)[3] // '') =~ /\b(?:un)?import\Z/)
|
|
67
|
14 |
0 |
if (((caller 0)[3] // '') =~ /\b(?:un)?import\Z/)
|
|
70
|
14 |
0 |
if (((caller 0)[3] // '') =~ /\b(?:un)?import\Z/)
|
|
73
|
0 |
0 |
if $pre
|
|
|
0 |
0 |
if $pre
|
|
|
14 |
0 |
if (((caller 0)[3] // '') =~ /\b(?:un)?import\Z/)
|
|
76
|
14 |
0 |
if (((caller 0)[3] // '') =~ /\b(?:un)?import\Z/)
|
|
79
|
14 |
0 |
if (((caller 0)[3] // '') =~ /\b(?:un)?import\Z/)
|
|
82
|
14 |
0 |
if (((caller 0)[3] // '') =~ /\b(?:un)?import\Z/)
|
|
88
|
0 |
0 |
if $pre
|
|
|
9 |
0 |
if $pre
|
|
95
|
0 |
0 |
if $pre
|
|
|
6 |
0 |
if $pre
|
|
108
|
6 |
0 |
$attrs{'allow'} ? :
|
|
132
|
1 |
3 |
if ($pre eq '~') { }
|
|
|
1 |
2 |
elsif ($pre eq '=') { }
|
|
191
|
2 |
57 |
if ($_ =~ /\s*use\s*((?!qw)(?&PerlQualifiedIdentifier))\s*((?&PerlList)) $PPR::GRAMMAR/msx)
|
|
197
|
17 |
40 |
unless @list
|
|
203
|
32 |
128 |
if $attrs{$o}
|
|
226
|
6 |
28 |
if ($attrs{'allow'})
|
|
230
|
7 |
27 |
$attrs{'is'} ? :
|
|
236
|
12 |
8 |
unless ($l =~ s/^\s*\-/${last}::/)
|
|
239
|
2 |
18 |
if ($l =~ s/^\s*\~//)
|
|
240
|
2 |
0 |
$PREFIX ? :
|
|
244
|
11 |
23 |
$attrs{'with'} ? :
|
|
246
|
2 |
32 |
$attrs{'use'} ? :
|