| line |
!l |
l&&!r |
l&&r |
condition |
|
77
|
0 |
67 |
0 |
$stmt and $elem->isa("PPI::Statement::Expression")
|
|
86
|
0 |
8 |
35 |
$psib->isa("PPI::Node") and my $match = _find_exposed_match_or_substitute($psib)
|
|
123
|
12 |
1 |
4 |
$prev->isa("PPI::Token::Word") and "unless" eq $prev->content
|
|
194
|
29 |
0 |
1 |
$elem->isa("PPI::Token::Symbol") and "\$" eq $elem->raw_type
|
|
|
0 |
0 |
29 |
$elem->isa("PPI::Token::Word") and $elem->content =~ / \A [\w:]+ \z /msx
|
|
203
|
30 |
0 |
1 |
$next->isa("PPI::Token::Operator") and "->" eq $next->content
|
|
210
|
29 |
0 |
1 |
$prior and $prior->isa("PPI::Token::Operator")
|
|
|
29 |
0 |
1 |
$prior and $prior->isa("PPI::Token::Operator") and "->" eq $prior->content
|
|
254
|
6 |
0 |
1 |
$target->isa("PPI::Token::Symbol") and "&" eq $target->raw_type
|
|
286
|
2 |
0 |
1 |
$line == $start_line and $char < $start_char
|
|
289
|
0 |
1 |
0 |
$line == $end_line and $char > $end_char
|
| line |
l |
!l&&r |
!l&&!r |
condition |
|
88
|
4 |
23 |
8 |
_is_control_transfer_to_left($self, $match, $elem) || _is_control_transfer_to_right($self, $match, $elem)
|
|
97
|
7 |
1 |
35 |
$parent->isa("PPI::Statement::Compound") or $parent->isa("PPI::Statement::When")
|
|
136
|
2 |
2 |
0 |
$self->{'_exception_source'}{$first->content} || _unambiguous_control_transfer($first, $elem)
|
|
151
|
18 |
8 |
3 |
"or" eq $oper_content or "||" eq $oper_content
|
|
159
|
8 |
14 |
3 |
$self->{'_exception_source'}{$next->content} || _unambiguous_control_transfer($next, $elem)
|
|
170
|
1 |
38 |
358 |
$_[1]->isa('PPI::Token::Regexp::Substitute') || $_[1]->isa('PPI::Token::Regexp::Match')
|
|
194
|
1 |
29 |
0 |
$elem->isa("PPI::Token::Symbol") and "\$" eq $elem->raw_type or $elem->isa("PPI::Token::Word") and $elem->content =~ / \A [\w:]+ \z /msx
|
|
203
|
0 |
10 |
21 |
$next->isa("PPI::Token::Subscript") or $next->isa("PPI::Token::Operator") and "->" eq $next->content
|
|
286
|
0 |
2 |
1 |
$line < $start_line or $line == $start_line and $char < $start_char
|
|
289
|
1 |
0 |
1 |
$line > $end_line or $line == $end_line and $char > $end_char
|