line |
true |
false |
branch |
69
|
0 |
12 |
unless $Perl::Critic::Policy::Variables::ProhibitNumericNamesWithLeadingZero::a->[1] <=> $Perl::Critic::Policy::Variables::ProhibitNumericNamesWithLeadingZero::b->[1]
|
106
|
0 |
26 |
unless $elem->find("PPI::Token::Magic")
|
108
|
9 |
18 |
unless $name =~ / \W 0 [0-9]+ \z /msx
|
128
|
24 |
2 |
unless $elem->find("PPI::Token::Cast")
|
129
|
0 |
3 |
unless my $block = $cast->snext_sibling
|
131
|
0 |
3 |
unless $block->isa("PPI::Structure::Block")
|
133
|
0 |
3 |
unless $block->find("PPI::Token")
|
|
0 |
3 |
unless my(@tokens) = @{[] unless $block->find("PPI::Token");}
|
135
|
0 |
3 |
if @tokens > 1
|
137
|
0 |
3 |
unless $tokens[0]->isa("PPI::Token::Number")
|
139
|
1 |
2 |
unless $tokens[0]->content =~ / \A 0 [0-9]+ \z /msx
|
160
|
150 |
6 |
unless $elem->find($class)
|
161
|
0 |
18 |
unless my $ppix_str = "PPIx::QuoteLike"->new($ppi_str)
|
164
|
0 |
18 |
unless $ppix_str->find("PPIx::QuoteLike::Token::Interpolation")
|
192
|
76 |
2 |
unless $elem->find($class)
|
193
|
0 |
6 |
unless my $ppix_re = "PPIx::Regexp"->new($ppi_re)
|
196
|
0 |
6 |
unless $ppix_re->find("PPIx::Regexp::Token::Code")
|