blib/lib/Data/BT/PhoneBill.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 5 | 8 | 62.5 |
line | true | false | branch |
---|---|---|---|
111 | 0 | 1 | unless my $fh = 'IO::File'->new($file, 'r') |
115 | 0 | 3 | if eof $fh |
130 | 1 | 3 | unless defined $line |
131 | 3 | 0 | if ($self->_csv->parse($line)) { } |