Branch Coverage

blib/lib/Crypt/XTEA_PP.pm
Criterion Covered Total %
branch 12 30 40.0


line true false branch
18 0 1 if (not defined $Crypt::XTEA_PP::Config{'use64bitint'})
44 0 2 unless defined $key
45 0 2 if (my $ref_of_key = ref $key) { }
46 0 0 unless $ref_of_key eq 'ARRAY'
47 0 0 if scalar @{$key;} != $ELEMENTS_IN_KEY
48 0 0 unless all sub { isint $_ != 0; } , @{$key;}
51 0 2 if length $key != $KEY_SIZE
54 0 2 if isint $rounds != 1
66 0 2 if length $plain_text != $BLOCK_SIZE
76 0 2 if length $cipher_text != $BLOCK_SIZE
87 0 2 if scalar @{$block_ref;} != $ELEMENTS_IN_BLOCK
88 0 2 if scalar @{$key_ref;} != $ELEMENTS_IN_KEY
112 0 2 if scalar @{$block_ref;} != $ELEMENTS_IN_BLOCK
113 0 2 if scalar @{$key_ref;} != $ELEMENTS_IN_KEY
128 0 2 if length $key_str != $KEY_SIZE