Branch Coverage

blib/lib/PerlBean/Attribute/Multi/Unique/Associative/MethodKey.pm
Criterion Covered Total %
branch 19 36 52.7


line true false branch
422 6 0 defined $_[0] ? :
425 0 6 unless ref $opt eq 'HASH'
428 6 0 exists $$opt{'id_method'} ? :
452 6 0 defined $self->get_short_description ? :
483 6 0 if ($clauses)
508 6 0 defined $self->get_short_description ? :
509 6 0 $self->is_allow_empty ? :
519 0 6 unless ($self->is_allow_empty)
563 6 0 defined $self->get_short_description ? :
597 6 0 defined $self->get_short_description ? :
630 6 0 defined $self->get_short_description ? :
631 1 5 defined $self->get_default_value ? :
632 6 0 $self->is_allow_empty ? :
635 0 6 defined $attr_overl ? :
644 0 6 unless ($self->is_allow_empty)
677 6 0 if ($clauses)
699 6 0 defined $self->get_short_description ? :
754 0 6 unless &_value_is_allowed('id_method', $val)