Branch Coverage

blib/lib/Data/TableData/Object/aohos.pm
Criterion Covered Total %
branch 60 68 88.2


line true false branch
20 8 6 if ($spec) { }
60 1 21 unless $row_hos
108 2 6 unless defined $row->{$col}
109 1 5 if $mem{$row->{$col}}++
126 1 8 unless exists $row->{$col}
128 3 5 if ($i == 0) { }
130 1 2 unless defined $val
132 2 3 if ($val_undef) { }
133 0 2 if defined $row->{$col}
135 0 3 unless defined $row->{$col}
136 1 2 unless $val eq $row->{$col}
149 1 3 unless defined $idx
160 2 4 if ($i > $idx) { }
3 1 elsif ($i == $idx) { }
169 3 0 if ($self->{'spec'})
172 3 3 if (not exists $self->{'cols_by_name'}{$name}) { }
187 1 3 unless defined $idx
189 0 3 unless length $new_name
190 1 2 if $new_name eq $old_name
191 1 1 if $new_name =~ /\A\d+\z/
200 1 0 if ($self->{'spec'})
210 1 3 unless defined $idx1
212 1 2 unless defined $idx2
213 1 1 if $idx1 == $idx2
227 1 0 if ($self->{'spec'})
237 1 5 if defined $self->col_name($name)
239 3 2 if (defined $idx) { }
240 2 1 unless $idx >= 0 and $idx <= $col_count
247 2 10 if $self->{'cols_by_name'}{$_} >= $idx
251 3 0 if ($self->{'spec'})
254 2 10 if defined $f->{'pos'} and $f->{'pos'} >= $idx
256 0 3 defined $spec ? :
263 3 6 $data ? :
274 1 1 unless defined $col_name