blib/lib/Finance/AMEX/Transaction/GRRCN/Base.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 4 | 12 | 33.3 |
line | true | false | branch |
---|---|---|---|
55 | 2801 | 0 | if ($self->file_format eq 'CSV' or $self->file_format eq 'TSV') { } |
0 | 0 | elsif ($self->file_format eq 'FIXED') { } | |
61 | 0 | 2801 | unless my $csv = 'Text::CSV'->new({'binary', 1, 'quote_char', '"', 'escape_char', '\\'}) |
67 | 0 | 2801 | if ($self->file_format eq 'TSV') |
71 | 2801 | 0 | if (my $status = $csv->parse($self->{'_line'})) |
81 | 0 | 0 | if (length $self->{'_line'} < $map->[0]) |