| blib/lib/Business/BR/RG.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 20 | 28 | 71.4 |
| line | true | false | branch |
|---|---|---|---|
| 27 | 0 | 211 | unless @$a == @$b |
| 33 | 1614 | 396 | if ($x and $y) |
| 34 | 7 | 1607 | if $y eq 'X' |
| 48 | 215 | 0 | if ($rg) |
| 52 | 215 | 0 | if (length $rg == 9) { } |
| 69 | 0 | 111 | if length $rg != 9 |
| 75 | 55 | 56 | $mod == 0 ? : |
| 87 | 1 | 1 | if (wantarray) |
| 100 | 100 | 0 | @_ ? : |
| 101 | 50 | 50 | $valid ? : |
| 107 | 5 | 15 | if ($dv == 0 and $valid and test_rg($base . $dv) == 0) |
| 111 | 0 | 100 | if wantarray |
| 113 | 0 | 100 | if (length $base == 9) { } |
| 129 | 100 | 0 | @_ ? : |