line |
true |
false |
branch |
37
|
0 |
13 |
unless $sub
|
41
|
8 |
5 |
if $success
|
51
|
1 |
4 |
if ($elem->isa('PPI::Statement::Sub') and $name eq 'new') { }
|
|
0 |
4 |
elsif ($elem->isa('PPI::Statement::Package') and $name eq 'main') { }
|
|
2 |
2 |
elsif ($elem->isa('PPI::Statement::Package') and $name =~ / \A t:: /x) { }
|
|
0 |
4 |
elsif ($elem->isa('PPI::Statement::Package') and $name =~ / Language :: [a-z]{2,3}_ /msx) { }
|
64
|
0 |
2 |
unless $name
|
77
|
0 |
8 |
if $name eq '$a'
|
78
|
0 |
8 |
if $name eq '$b'
|
81
|
0 |
8 |
if substr($name, 0, 1) eq '&'
|
84
|
0 |
8 |
if length $name == 2
|