Branch Coverage

blib/lib/Crypt/XXTEA_PP.pm
Criterion Covered Total %
branch 13 32 40.6


line true false branch
18 0 1 if (not defined $Crypt::XXTEA_PP::Config{'use64bitint'})
43 0 2 unless defined $key
44 0 2 if (my $ref_of_key = ref $key) { }
45 0 0 unless $ref_of_key eq 'ARRAY'
46 0 0 if scalar @{$key;} != $ELEMENTS_IN_KEY
47 0 0 unless all sub { isint $_ != 0; } , @{$key;}
50 0 2 if length $key != $KEY_SIZE
64 0 2 if length $plain_text < $MIN_BLOCK_SIZE
65 0 2 if length($plain_text) % $FACTOR != 0
77 0 2 if length $cipher_text < $MIN_BLOCK_SIZE
78 0 2 if length($cipher_text) % $FACTOR != 0
90 0 2 if scalar @{$block_ref;} < $MIN_ELEMENTS_IN_BLOCK
91 0 2 if scalar @{$key_ref;} != $ELEMENTS_IN_KEY
122 0 2 if scalar @{$block_ref;} < $MIN_ELEMENTS_IN_BLOCK
123 0 2 if scalar @{$key_ref;} != $ELEMENTS_IN_KEY
155 0 2 if length $key_str != $KEY_SIZE