| line |
true |
false |
branch |
|
46
|
0 |
9730 |
unless my $behavior = $BEHAVIORS{$behavior_name}
|
|
58
|
0 |
9730 |
unless defined $specification
|
|
65
|
0 |
9730 |
if (not $specification_type) { }
|
|
70
|
0 |
9730 |
unless $specification_type eq "HASH"
|
|
78
|
0 |
9730 |
unless defined $specification->{'name'}
|
|
98
|
8726 |
1004 |
if ($behavior_name) { }
|
|
146
|
0 |
9726 |
unless defined $new_value
|
|
156
|
940 |
0 |
if ($description) { }
|
|
157
|
99 |
841 |
if ($Perl::Critic::PolicyParameter::PERIOD ne substr($description, length($description) - 1))
|
|
178
|
820 |
8906 |
unless defined $new_value
|
|
209
|
8543 |
10909 |
unless defined $new_value
|
|
223
|
9660 |
0 |
if ($parser)
|
|
245
|
0 |
940 |
unless ($description)
|
|
249
|
940 |
0 |
if ($prefix)
|