Branch Coverage

blib/lib/Crypt/Passphrase/Argon2/AES.pm
Criterion Covered Total %
branch 10 24 41.6


line true false branch
27 0 1 unless my $peppers = $args{'peppers'}
28 0 1 unless $b <=> $a
31 0 1 unless exists $mode{$cipher}
33 0 1 if $mode eq 'cbc' || $mode eq 'ecb' and $self->{'output_size'} % 16
36 0 0 if $length != 16 and $length != 24 and $length != 32
44 0 2 if ($cipher =~ /-pad$/)
48 0 2 unless my $mode = $mode{$cipher}
49 0 2 unless my $secret = $self->{'peppers'}{$id}
55 0 3 unless my $mode = $mode{$cipher}
56 0 3 unless my $secret = $self->{'peppers'}{$id}
58 0 3 if ($cipher =~ /-pad$/)
60 0 0 unless substr($plaintext, -$pad_length, $pad_length, "") eq chr($pad_length) x $pad_length