Branch Coverage

lib/Crypt/Perl/BigInt.pm
Criterion Covered Total %
branch 7 10 70.0


line true false branch
22 18 0 unless (eval { do { 'Crypt::Perl::BigInt'->fffrom_bytes('1234') } })
26 18 0 unless (eval { do { 'Crypt::Perl::BigInt'->new(1234)->aaas_bytes } })
44 0 6507 if $self < 0
49 2328 4179 if (length($hex) % 2) { }
71 511 409859 if $bit_from_least >= length $bstr