Branch Coverage

blib/lib/Crypt/Passphrase/Bcrypt/AES.pm
Criterion Covered Total %
branch 9 22 40.9


line true false branch
24 0 1 unless my $peppers = $args{'peppers'}
25 0 1 unless $b <=> $a
28 0 1 unless exists $mode{$cipher}
32 0 0 if $length != 16 and $length != 24 and $length != 32
40 0 2 if ($cipher =~ /-pad$/u)
44 0 2 unless my $mode = $mode{$cipher}
45 0 2 unless my $secret = $self->{'peppers'}{$id}
51 0 3 unless my $mode = $mode{$cipher}
52 0 3 unless my $secret = $self->{'peppers'}{$id}
54 0 3 if ($cipher =~ /-pad$/u)
56 0 0 unless substr($plaintext, -$pad_length, $pad_length, "") eq chr($pad_length) x $pad_length