| line |
true |
false |
branch |
|
42
|
0 |
14 |
unless $elem =~ /$LEADING_RX/
|
|
43
|
0 |
14 |
if $self->{'_strict'}
|
|
44
|
0 |
14 |
if $self->_is_first_argument_of_chmod_or_umask($elem)
|
|
45
|
0 |
14 |
if $self->_is_second_argument_of_mkdir($elem)
|
|
46
|
0 |
14 |
if $self->_is_second_argument_of_mkfifo($elem)
|
|
47
|
0 |
14 |
if $self->_is_third_argument_of_dbmopen($elem)
|
|
48
|
0 |
14 |
if $self->_is_fourth_argument_of_sysopen($elem)
|
|
66
|
0 |
14 |
unless $previous_token
|
|
77
|
0 |
14 |
unless $previous_token
|
|
78
|
14 |
0 |
if $previous_token->content ne $Perl::Critic::Policy::ValuesAndExpressions::ProhibitLeadingZeros::COMMA
|
|
83
|
0 |
0 |
unless $previous_token
|
|
87
|
0 |
0 |
unless $previous_token
|
|
97
|
0 |
14 |
unless $previous_token
|
|
98
|
14 |
0 |
if $previous_token->content ne $Perl::Critic::Policy::ValuesAndExpressions::ProhibitLeadingZeros::COMMA
|
|
103
|
0 |
0 |
unless $previous_token
|
|
107
|
0 |
0 |
unless $previous_token
|
|
118
|
0 |
14 |
unless $previous_token
|
|
119
|
14 |
0 |
if $previous_token->content ne $Perl::Critic::Policy::ValuesAndExpressions::ProhibitLeadingZeros::COMMA
|
|
124
|
0 |
0 |
unless $previous_token
|
|
129
|
0 |
0 |
unless $previous_token
|
|
130
|
0 |
0 |
if $previous_token->content ne $Perl::Critic::Policy::ValuesAndExpressions::ProhibitLeadingZeros::COMMA
|
|
135
|
0 |
0 |
unless $previous_token
|
|
139
|
0 |
0 |
unless $previous_token
|
|
149
|
0 |
14 |
unless $previous_token
|
|
150
|
14 |
0 |
if $previous_token->content ne $Perl::Critic::Policy::ValuesAndExpressions::ProhibitLeadingZeros::COMMA
|
|
159
|
0 |
0 |
unless $previous_token
|
|
160
|
0 |
0 |
if $previous_token->content ne $Perl::Critic::Policy::ValuesAndExpressions::ProhibitLeadingZeros::COMMA
|
|
165
|
0 |
0 |
unless $previous_token
|
|
170
|
0 |
0 |
unless $previous_token
|
|
171
|
0 |
0 |
if $previous_token->content ne $Perl::Critic::Policy::ValuesAndExpressions::ProhibitLeadingZeros::COMMA
|
|
176
|
0 |
0 |
unless $previous_token
|
|
180
|
0 |
0 |
unless $previous_token
|
|
183
|
0 |
0 |
if ($previous_token->content eq "my")
|
|
186
|
0 |
0 |
unless $previous_token
|