| blib/lib/Text/Roman.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 29 | 30 | 96.6 |
| line | true | false | branch |
|---|---|---|---|
| 29 | 104 | 4143 | @_ ? : |
| 31 | 1 | 4246 | unless /^[@RSN]+$/x |
| 32 | 2 | 4244 | if /([IXCM])\1{3,}|([VLD])\2+/x |
| 44 | 4104 | 4 | @_ ? : |
| 46 | 1 | 4105 | if not $n =~ /^[0-9]+$/x or $n <= 0 or $n >= 4000 |
| 57 | 4101 | 4 | defined wantarray ? : |
| 65 | 4106 | 12 | @_ ? : |
| 67 | 1 | 4117 | unless isroman() |
| 72 | 0 | 28336 | if $ret <= $_ret |
| 78 | 4113 | 4 | defined wantarray ? : |
| 84 | 3 | 6 | @_ ? : |
| 85 | 1 | 8 | unless /^[_@RSN]+$/x |
| 96 | 4 | 2 | @_ ? : |
| 98 | 1 | 5 | unless ismilhar() |
| 106 | 3 | 2 | defined wantarray ? : |