| blib/lib/Business/ID/BCA.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 10 | 16 | 62.5 |
| line | true | false | branch |
|---|---|---|---|
| 1068 | 0 | 7 | unless defined $acc |
| 1070 | 3 | 4 | unless length $acc == 10 |
| 1075 | 4 | 0 | if ($acc =~ /^[5-9]/) { } |
| 1087 | 1 | 3 | if ($args{'check_known_branches'}) |
| 1088 | 1 | 0 | unless $data_hash->{$fbranch} |
| 1090 | 3 | 0 | if (my $bdata = $data_hash->{$fbranch}) |
| 1096 | 0 | 3 | if ($local =~ /^1/) { } |
| 3 | 0 | elsif ($local =~ /^3/) { } |