| blib/lib/Webqq/Encryption/TEA/Perl.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 54 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 17 | 0 | 0 | if (not $y or $y > 4) |
| 37 | 0 | 0 | unless (@$B) |
| 43 | 0 | 0 | if (length $A == 1) |
| 62 | 0 | 0 | unless ($A) |
| 79 | 0 | 0 | if $a != 0 |
| 90 | 0 | 0 | if ($a < 8) |
| 94 | 0 | 0 | if ($a == 8) |
| 96 | 0 | 0 | if ($m) { } |
| 116 | 0 | 0 | if ($a < 8) |
| 120 | 0 | 0 | if ($a == 8) |
| 122 | 0 | 0 | if ($m) { } |
| 143 | 0 | 0 | if ($a < 8) |
| 147 | 0 | 0 | if ($a == 8) |
| 149 | 0 | 0 | if ($m) { } |
| 176 | 0 | 0 | if ($y % 8 != 0 or $y < 16) |
| 182 | 0 | 0 | if $B < 0 |
| 192 | 0 | 0 | if ($a < 8) |
| 196 | 0 | 0 | if ($a == 8) |
| 199 | 0 | 0 | unless (f()) |
| 204 | 0 | 0 | if ($a < 8) |
| 210 | 0 | 0 | if ($a == 8) |
| 213 | 0 | 0 | unless (f()) |
| 218 | 0 | 0 | if ($a < 8) |
| 219 | 0 | 0 | if (($z[$t + $a] ^ $w[$a]) != 0) |
| 224 | 0 | 0 | if ($a == 8) |
| 227 | 0 | 0 | unless (f()) |
| 298 | 0 | 0 | if ($B) { } |