Branch Coverage

blib/lib/Math/ModInt.pm
Criterion Covered Total %
branch 60 60 100.0


line true false branch
52 11 418 if 0.5 != $probe / 2 - ($probe ^ 1) / 2
71 35 289 ref $arg ? :
80 17 8 if ($this->is_defined and $that->is_defined)
88 122 5 if (_is_integer($modulus))
89 11 111 if $modulus > 94906265
90 79 32 if $modulus > 3
91 7 25 if $modulus == 3
92 10 15 if $modulus == 2
93 6 9 if $modulus == 1
100 1 113 unless do { local $@; $loaded{$class} ||= eval "require $class" }
110 9 111 if (not ref $that && $that->isa('Math::ModInt')) { }
13 98 elsif ($this->modulus != $that->modulus) { }
121 6 86 if (not ref $that && $that->isa('Math::ModInt')) { }
4 82 elsif ($this->modulus != $that->modulus) { }
127 3 85 $reversed ? :
132 6 125 if (not ref $that && $that->isa('Math::ModInt')) { }
4 121 elsif ($this->modulus != $that->modulus) { }
143 6 87 if (not ref $that && $that->isa('Math::ModInt')) { }
4 83 elsif ($this->modulus != $that->modulus) { }
149 3 86 $reversed ? :
155 13 186 if ($reversed or not _is_integer($exp))
164 16 658 unless (ref $that and $that->isa('Math::ModInt'))
175 9 12 unless (ref $that and $that->isa('Math::ModInt'))
188 1 2 if (ref $this) { }
225 236 19 if ref $this
231 2 1 if ref $this
247 16 1 if 'Math::ModInt' eq (caller)[0]
256 14 12 $n <= $r ? :
264 8 16 $n < $r ? :
289 12 1 $this->is_defined ? :