| blib/lib/Crypt/Unsnoopable.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 20 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 54 | 0 | 0 | if -e $padfn |
| 65 | 0 | 0 | unless exists $self->{'otps'}{$pad_name} |
| 68 | 0 | 0 | unless (length($compressed) + 4) * 2 <= length $pad->{'pad'} |
| 83 | 0 | 0 | unless my($pad_name) = grep({$pads->{$_}{'id'} eq $pad_id;} keys %$pads) |
| 85 | 0 | 0 | unless substr($pad->{'pad'}, 0, 8) eq $pad_start |
| 86 | 0 | 0 | unless length $hex <= $padlen |
| 97 | 0 | 0 | if $auto eq 'DESTROY' |
| 98 | 0 | 0 | if ($auto =~ /^(db|debug|otps)$/x) { } |
| 99 | 0 | 0 | if defined $_[0] |
| 109 | 0 | 0 | if $self->debug |