| line |
true |
false |
branch |
|
39
|
0 |
0 |
unless $#$names |
|
|
0 |
0 |
unless (defined $names and eval {
do {
1 unless $#$names
}
} and defined $types and eval {
do {
1 unless $#$types
}
}) |
|
40
|
0 |
0 |
unless $#$types |
|
45
|
0 |
0 |
unless @$names == @$types |
|
50
|
0 |
0 |
unless defined $type |
|
52
|
0 |
0 |
unless grep(($type eq $_), @Data_Types) |
|
60
|
0 |
0 |
unless (ref($row) =~ /ARRAY/) |
|
64
|
0 |
0 |
unless (@$row == @$names) |
|
71
|
0 |
0 |
if @invalid |
|
114
|
0 |
0 |
if $@ |
|
141
|
0 |
0 |
if (defined $new_names) |
|
142
|
0 |
0 |
unless ref $new_names |
|
153
|
0 |
0 |
if (defined $new_types) |
|
154
|
0 |
0 |
unless ref $new_types |
|
165
|
0 |
0 |
if (defined $new_value) |
|
166
|
0 |
0 |
unless ref $new_value |
|
178
|
0 |
0 |
$label =~ /^\d+$/ ? : |
|
180
|
0 |
0 |
unless defined $index |
|
181
|
0 |
0 |
if $index > $self->num_columns |
|
190
|
0 |
0 |
$label =~ /^\d+$/ ? : |
|
192
|
0 |
0 |
unless ref($col) =~ /ARRAY/ |
|
193
|
0 |
0 |
unless defined $index |
|
194
|
0 |
0 |
if $index > $self->num_columns |
|
212
|
0 |
0 |
unless @_ >= 4 |
|
213
|
0 |
0 |
unless ref($col) =~ /ARRAY/ |
|
214
|
0 |
0 |
if defined $self->get_index($name) |
|
228
|
0 |
0 |
$label =~ /^\d+$/ ? : |
|
230
|
0 |
0 |
unless defined $index |
|
231
|
0 |
0 |
if $index > $self->num_columns |
|
245
|
0 |
0 |
if $del_idx > $#$arrayref |
|
247
|
0 |
0 |
$i >= $del_idx ? : |
|
255
|
0 |
0 |
if $row_num > $self->num_rows |
|
262
|
0 |
0 |
unless ref($row) =~ /ARRAY/ |
|
263
|
0 |
0 |
if $row_num > $self->num_rows |
|
264
|
0 |
0 |
unless @$row == $self->num_columns |
|
274
|
0 |
0 |
unless ref($row) =~ /ARRAY/ |
|
275
|
0 |
0 |
unless @$row == $self->num_columns |
|
284
|
0 |
0 |
if (@{$self->types;}) { } |
|
285
|
0 |
0 |
unless $num_rows == $self->num_columns |
|
301
|
0 |
0 |
if $row_num > $self->num_rows |
|
313
|
0 |
0 |
if $row_num > $self->num_rows or $col_num > $self->num_columns |
|
325
|
0 |
0 |
if $row_num > $self->num_rows or $col_num > $self->num_columns |
|
335
|
0 |
0 |
$label =~ /^\d+$/ ? : |
|
337
|
0 |
0 |
if not defined $col_num or $row_num >= $self->num_rows or $col_num >= $self->num_columns |
|
348
|
0 |
0 |
$label =~ /^\d+$/ ? : |
|
350
|
0 |
0 |
if not defined $col_num or $row_num >= $self->num_rows or $col_num >= $self->num_columns |
|
363
|
0 |
0 |
if lc $name eq lc $$self{'names'}[$i] |
|
389
|
0 |
0 |
if ($self->num_rows) |
|
391
|
0 |
0 |
unless defined $type |
|
393
|
0 |
0 |
unless grep(($type eq $_), @Data_Types) |
|
405
|
0 |
0 |
defined $field ? : |
|
408
|
0 |
0 |
if $@ |
|
452
|
0 |
0 |
if ($element eq 'recordset' and not $$self{'seen_recordsets'}++) { } |
|
|
0 |
0 |
elsif ($element eq 'field' and $$self{'seen_recordsets'} == 1) { } |
|
453
|
0 |
0 |
unless ($$attribs{'rowcount'} =~ /^\d+$/) |
|
458
|
0 |
0 |
if (not @names or grep((!/^[_A-Za-z][_.0-9A-Za-z]*$/), @names)) |
|
466
|
0 |
0 |
unless $$attribs{'name'} |
|
467
|
0 |
0 |
unless $$self{'curr_row'} < 0 |
|
470
|
0 |
0 |
unless ($$attribs{'name'} eq $expected) |
|
478
|
0 |
0 |
unless ($parse_var) |
|
479
|
0 |
0 |
unless grep(($element eq $_), @Data_Types) |
|
481
|
0 |
0 |
unless $parse_var = 'WDDX::Parser'->create_var($element) |
|
498
|
0 |
0 |
if ($element eq 'recordset' and not --$$self{'seen_recordsets'}) { } |
|
|
0 |
0 |
elsif ($element eq 'field' and $$self{'seen_recordsets'} == 1) { } |
|
504
|
0 |
0 |
unless (@data) |
|
516
|
0 |
0 |
if ($$self{'curr_row'} != $$self{'row_count'} - 1) |
|
523
|
0 |
0 |
unless ($parse_var) |
|
538
|
0 |
0 |
if ($parse_var) { } |
|
|
0 |
0 |
elsif ($data =~ /\S/) { } |
|
557
|
0 |
0 |
if $curr_field < 0 or $curr_row < 0 |
|
559
|
0 |
0 |
if defined $var |
|
561
|
0 |
0 |
ref $curr_var && $curr_var->is_parser ? : |
|
571
|
0 |
0 |
if ($curr_field < 0) |
|
574
|
0 |
0 |
if ($$self{'curr_row'} >= $$self{'row_count'}) |