Branch Coverage

blib/lib/Perl/ToPerl6/TransformerParameter/Behavior/Enumeration.pm
Criterion Covered Total %
branch 18 20 90.0


line true false branch
21 1 7 unless my $valid_values = $specification->{'enumeration_values'}
25 1 6 unless ref $valid_values eq 'ARRAY'
30 2 4 unless scalar @{$valid_values;} > 1
47 2 2 if ($allow_multiple_values) { }
58 5 2 if (defined $config_string)
62 6 1 if (defined $value_string)
67 1 5 if (@bad_values)
98 3 2 if (defined $config_string)
102 1 3 if (defined $value_string and $Perl::ToPerl6::TransformerParameter::Behavior::Enumeration::EMPTY ne $value_string and not defined $value_lookup->{$value_string})
133 0 0 if ($description)