Branch Coverage

blib/lib/DBIx/Changeset/Record.pm
Criterion Covered Total %
branch 13 14 92.8


line true false branch
58 2 31 unless defined $$params{'uri'}
61 56 0 if $self->can($field)
73 10 1 if ($file =~ m[^/\*.*?tag:\s*(\S+)]mx) { }
89 2 2 unless defined $data
92 2 2 if ($data =~ m[^/\*.*?tag:\s*(\S+)]mx) { }
160 32 96 if ($key eq 'id' or $key eq 'valid')
162 9 23 unless (defined $value)