Branch Coverage

blib/lib/Convert/PEM/CBC.pm
Criterion Covered Total %
branch 16 26 61.5


line true false branch
20 6 2 exists $param{'IV'} ? :
21 0 8 unless my $cipher = $param{'Cipher'}
23 0 8 if (ref $cipher) { }
28 0 8 if $@
30 6 2 if (not $key and exists $param{'Passphrase'})
34 0 8 unless $key
49 3 0 if length $blocks[-1] < $bs
55 0 3 unless $last and length $last
56 3 0 if (length $last)
57 3 0 if length $last < $bs
71 0 5 length $blocks[-1] < $bs ? :
80 5 0 if (length $last)
85 2 3 if $cut > $bs