| line |
true |
false |
branch |
|
48
|
31 |
1743 |
if $elem->content ne "="
|
|
51
|
0 |
1743 |
unless $destination
|
|
53
|
0 |
46 |
unless $destination = $destination->sprevious_sibling
|
|
57
|
516 |
1227 |
if (my $var = $self->_is_non_local_magic_dest($destination))
|
|
74
|
708 |
336 |
if $modifier and $modifier->isa("PPI::Token::Word") and $$local_or_my{$modifier->content}
|
|
79
|
1035 |
1538 |
if ($elem->isa('PPI::Token::Symbol')) { }
|
|
|
1228 |
310 |
elsif ($elem->isa('PPI::Structure::List') or $elem->isa('PPI::Statement::Expression')) { }
|
|
80
|
516 |
519 |
$self->_is_magic_var($elem) ? :
|
|
88
|
608 |
930 |
if $var
|
|
101
|
155 |
880 |
if $self->{'_allow'}{$variable_name}
|
|
102
|
256 |
624 |
if $elem->isa("PPI::Token::Magic")
|
|
107
|
364 |
260 |
unless is_perl_global($elem)
|