Branch Coverage

blib/lib/Class/DBI/FormTools.pm
Criterion Covered Total %
branch 30 36 83.3


line true false branch
20 50 3 unless $remote_object_ids
23 0 23 unless ref $self or defined $object_id
41 3 50 if (keys %$id_fields) { }
45 30 20 ref $self ? :
93 39 2 if $attribute
135 3 24 if ($form_id and $form_id =~ /;/) { }
8 16 elsif ($form_id and $form_id ne 'new') { }
1 15 elsif (not $form_id) { }
163 10 9 unless $foreign_id
172 6 3 if exists $id_field{$foreign_accessor}
182 19 8 unless ($object)
184 10 9 if keys %id_field
189 12 15 unless ($object)
200 0 69 unless $attr
217 0 6 unless $self->can($name)
222 6 0 if ($type eq 'text' or $type eq 'hidden')
239 6 0 ref $self ? :
0 6 defined $default ? :