| line |
true |
false |
branch |
|
46
|
0 |
9835 |
unless my $behavior = $BEHAVIORS{$behavior_name}
|
|
58
|
0 |
9835 |
unless defined $specification
|
|
65
|
0 |
9835 |
if (not $specification_type) { }
|
|
70
|
0 |
9835 |
unless $specification_type eq "HASH"
|
|
78
|
0 |
9835 |
unless defined $specification->{'name'}
|
|
98
|
8820 |
1015 |
if ($behavior_name) { }
|
|
146
|
0 |
9831 |
unless defined $new_value
|
|
156
|
940 |
0 |
if ($description) { }
|
|
157
|
99 |
841 |
if ($Perl::Critic::PolicyParameter::PERIOD ne substr($description, length($description) - 1))
|
|
178
|
829 |
9002 |
unless defined $new_value
|
|
209
|
8635 |
11027 |
unless defined $new_value
|
|
223
|
9765 |
0 |
if ($parser)
|
|
245
|
0 |
940 |
unless ($description)
|
|
249
|
940 |
0 |
if ($prefix)
|