| blib/lib/Business/CINS.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 20 | 22 | 90.9 |
| line | true | false | branch |
|---|---|---|---|
| 69 | 17 | 311 | if @_ |
| 82 | 2 | 63 | if @_ |
| 134 | 12 | 100 | unless (length $val == 9) |
| 138 | 9 | 91 | unless ('Business::CINS'->domicile_descr($self->domicile_code)) |
| 146 | 17 | 74 | unless ($val =~ /^.[A-Z0-9]{7}/) |
| 150 | 15 | 59 | unless ($val =~ /\d$/) |
| 162 | 28 | 31 | if ($self->is_fixed_income) |
| 164 | 12 | 0 | unless ($issue_num =~ /^[A-Z][A-Z]$/ or $issue_num =~ /^[A-Z][0-9]$/ or $issue_num =~ /^[0-9][A-Z]$/) |
| 173 | 31 | 16 | unless $r |
| 198 | 4 | 16 | unless defined $r |
| 232 | 126 | 0 | @_ ? : |