| blib/lib/Crypt/Simple.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 14 | 64.2 |
| line | true | false | branch |
|---|---|---|---|
| 144 | 0 | 12 | unless $sig eq md5($result) |
| 146 | 1 | 11 | wantarray ? : |
| 154 | 0 | 12 | if @p == 1 |
| 158 | 21 | 9 | unless exists $p{$k} |
| 159 | 9 | 0 | if (my $m = $class->can("key_from_$k")) |
| 161 | 9 | 0 | if $key |
| 181 | 0 | 6 | unless open my $io, $file |