| lib/Sisimai/Rhost/FrancePTT.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 7 | 8 | 87.5 |
| line | true | false | branch |
|---|---|---|---|
| 16 | 6 | 84 | unless $argvs->{'diagnosticcode'} |
| 190 | 82 | 2 | if ($issuedcode =~ /\b(LPN|LPNAAA|OFR|OUK)(_[0-9]{3}|[0-9]{3}[-_][0-9]{3})\b/iu) |
| 196 | 76 | 8 | if length $reasontext |
| 201 | 8 | 0 | unless grep {index($issuedcode, $_) != -1;} @{$$messagesof{$e}} |