| blib/lib/CTK/Crypt/TCD04.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 16 | 68.7 |
| line | true | false | branch |
|---|---|---|---|
| 112 | 0 | 1 | if length $string == 0 |
| 118 | 0 | 1 | if length $string == 0 |
| 123 | 13 | 13 | if (length $ch2 == 2) |
| 133 | 0 | 14 | if length $ch != 1 |
| 136 | 14 | 0 | $kod1 > 0 ? : |
| 13 | 1 | $kod2 > 0 ? : | |
| 141 | 0 | 14 | if length $ch2 != 2 |
| 142 | 2 | 26 | ord($_) % 15 == 0 && ord $_ > 0 ? : |