| blib/lib/Business/FR/SSN.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 12 | 91.6 |
| line | true | false | branch |
|---|---|---|---|
| 14 | 4 | 5 | unless $ssn =~ /^\d{15}$/ |
| 17 | 0 | 5 | unless $ssn =~ /^(1|2)/ |
| 21 | 1 | 4 | if $birth > 12 or $birth == 0 |
| 41 | 1 | 3 | if $ssn |
| 43 | 3 | 1 | substr($$self, 13, 2) == 97 - substr($$self, 0, 13) % 97 ? : |
| 50 | 3 | 6 | if $ssn |