Branch Coverage

blib/lib/TableData/Object/aohos.pm
Criterion Covered Total %
branch 56 64 87.5


line true false branch
18 8 6 if ($spec) { }
84 2 6 unless defined $row->{$col}
85 1 5 if $mem{$row->{$col}}++
102 1 8 unless exists $row->{$col}
104 3 5 if ($i == 0) { }
106 1 2 unless defined $val
108 2 3 if ($val_undef) { }
109 0 2 if defined $row->{$col}
111 0 3 unless defined $row->{$col}
112 1 2 unless $val eq $row->{$col}
125 1 3 unless defined $idx
136 2 4 if ($i > $idx) { }
3 1 elsif ($i == $idx) { }
145 3 0 if ($self->{'spec'})
148 3 3 if (not exists $self->{'cols_by_name'}{$name}) { }
163 1 3 unless defined $idx
165 0 3 unless length $new_name
166 1 2 if $new_name eq $old_name
167 1 1 if $new_name =~ /\A\d+\z/
176 1 0 if ($self->{'spec'})
186 1 3 unless defined $idx1
188 1 2 unless defined $idx2
189 1 1 if $idx1 == $idx2
203 1 0 if ($self->{'spec'})
213 1 4 if defined $self->col_name($name)
215 3 1 if (defined $idx) { }
216 2 1 unless $idx >= 0 and $idx <= $col_count
223 2 5 if $self->{'cols_by_name'}{$_} >= $idx
227 2 0 if ($self->{'spec'})
230 2 5 if defined $f->{'pos'} and $f->{'pos'} >= $idx
232 0 2 defined $spec ? :
248 1 1 unless defined $col_name