Branch Coverage

lib/Crypt/Perl/BigInt.pm
Criterion Covered Total %
branch 9 14 64.2


line true false branch
36 22 0 unless (eval { do { "Crypt::Perl::BigInt"->fffrom_bytes(1234) } })
40 22 0 unless (eval { do { "Crypt::Perl::BigInt"->new(1234)->aaas_bytes } })
45 0 22 unless (eval { do { "Crypt::Perl::BigInt"->new(1234)->to_bin } })
48 0 22 unless (eval { do { "Crypt::Perl::BigInt"->new(1234)->to_hex } })
70 0 7399 if $self < 0
75 2382 5017 if (length($hex) % 2) { }
106 1 370563 if $bit_from_least >= length $bstr