| line |
true |
false |
branch |
|
46
|
0 |
29026 |
unless my $behavior = $BEHAVIORS{$behavior_name}
|
|
58
|
0 |
29026 |
unless defined $specification
|
|
65
|
0 |
29026 |
if (not $specification_type) { }
|
|
70
|
0 |
29026 |
unless $specification_type eq "HASH"
|
|
78
|
0 |
29026 |
unless defined $specification->{'name'}
|
|
98
|
27790 |
1236 |
if ($behavior_name) { }
|
|
146
|
0 |
29022 |
unless defined $new_value
|
|
156
|
940 |
0 |
if ($description) { }
|
|
157
|
99 |
841 |
if ($Perl::Critic::PolicyParameter::PERIOD ne substr($description, length($description) - 1))
|
|
178
|
1020 |
28002 |
unless defined $new_value
|
|
209
|
27548 |
30496 |
unless defined $new_value
|
|
223
|
28956 |
0 |
if ($parser)
|
|
245
|
0 |
940 |
unless ($description)
|
|
249
|
940 |
0 |
if ($prefix)
|