Branch Coverage

blib/lib/Finance/AMEX/Transaction/GRRCN/Base.pm
Criterion Covered Total %
branch 6 14 42.8


line true false branch
60 6 2814 unless exists $self->fields->{$field}
62 2814 0 if ($self->file_format eq 'CSV' or $self->file_format eq 'TSV') { }
0 0 elsif ($self->file_format eq 'FIXED') { }
68 0 2814 unless my $csv = "Text::CSV"->new({"binary", 1, "quote_char", "\"", "escape_char", "\\"})
75 0 2814 if ($self->file_format eq "TSV")
79 2814 0 if (my $status = $csv->parse($self->{'_line'}))
91 0 0 if (length $self->{'_line'} < $map->[0])