| blib/lib/Data/TableReader.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 33 | 84 | 39.2 |
| line | l | !l | condition |
|---|---|---|---|
| 551 | 0 | 13 | ++$eof and return undef |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 34 | 0 | 12 | 1 | ref $i and ref $i eq 'Spreadsheet::ParseExcel::Worksheet' |
| 35 | 0 | 12 | 0 | ref $i and ref $i eq 'GLOB' || ref($i)->can('read') |
| 87 | 0 | 0 | 13 | defined $list and ref $list eq 'ARRAY' |
| 95 | 29 | 0 | 0 | defined $args{'isa'} and not defined $args{'type'} |
| 149 | 0 | 0 | 1 | ref $input and ref($input)->can('get_cell') |
| 151 | 0 | 0 | 0 | ref $input and ref($input)->can('worksheets') |
| 187 | 0 | 0 | 0 | defined $input and !ref($input) || ref($input) =~ /path|file/i |
| 209 | 0 | 0 | 0 | $comma_count > $eol_count and $comma_count > $tab_count |
| 210 | 0 | 0 | 0 | $tab_count > $eol_count and $tab_count > $comma_count |
| 213 | 0 | 0 | 0 | $probably_csv and $probably_csv > $probably_tsv |
| 214 | 0 | 0 | 0 | $probably_tsv and $probably_tsv > $probably_csv |
| 244 | 12 | 0 | 1 | not $self->_find_table_in_dataset($data_iter, $stash) || defined $stash->{'fatal'} and $data_iter->next_dataset |
| 412 | 3 | 4 | 0 | $found{$match[0]} and not $match[0]->array |
| 551 | 0 | 13 | 35 | !$eof && &$data_iter(\@row_slice) |
| 563 | 8 | 6 | 79 | defined $row->[$_] && length $row->[$_] |
| line | l | !l | condition |
|---|---|---|---|
| 76 | 12 | 1 | $self->_file_handle || '' |
| 243 | 12 | 0 | $stash ||= {} |
| 267 | 0 | 0 | $stash->{'fatal'} || q[Can't locate valid header] |
| 339 | 0 | 0 | $stash->{'context'} || '' |
| 343 | 0 | 0 | $stash->{'context'} || '' |
| 349 | 21 | 0 | $stash->{'context'} || '' |
| 355 | 9 | 12 | $stash->{'free_fields'} ||= [(sort {$a->required ? -1 : ($b->required ? 1 : 0);} grep({not $_->follows_list;} @$fields))] |
| 358 | 9 | 12 | $stash->{'follows_fields'} ||= [grep({$_->follows_list;} @$fields)] |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 35 | 4 | 0 | 8 | ref $i eq 'GLOB' || ref($i)->can('read') |
| 47 | 8 | 0 | 0 | $decoder_ref eq 'HASH' or $decoder_ref eq 'ARRAY' |
| 125 | 0 | 0 | 2 | $level eq 'warn' or $level eq 'error' |
| 131 | 1 | 0 | 10 | $level eq 'warn' or $level eq 'error' |
| 187 | 0 | 0 | 0 | !ref($input) || ref($input) =~ /path|file/i |
| 244 | 12 | 0 | 1 | $self->_find_table_in_dataset($data_iter, $stash) || defined $stash->{'fatal'} |
| 566 | 0 | 2 | 0 | $first_blank ||= $data_iter->position |