| blib/lib/Math/NumSeq.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 11 | 22 | 50.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 134 | 0 | 0 | 0 | ($info = $class_or_self->parameter_info_hash->{$name}) && $info->{'default'} |
| 145 | 0 | 860 | 0 | ref $self and my $href = $self->{'characteristic'} |
| 215 | 48450 | 228 | 0 | $method eq 'ith_pair' and not +(return $class->can('ith')) |
| line | l | !l | condition |
|---|---|---|---|
| 93 | 15 | 3 | $self->{'oeis_anum'} || undef |
| 123 | 1 | 5 | $parameter_info_hash{$class} ||= {map({$_->{'name'}, $_;} $class_or_self->parameter_info_list)} |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 69 | 0 | 63 | 0 | eval qq[\n#line 70 "/root/.cpan/build/Math-NumSeq-72-Aq4aSB/blib/lib/Math/NumSeq.pm"\n# print "attempt Locale::Messages for __\\n";\nuse Locale::Messages ();\nsub __ { Locale::Messages::dgettext('Math-NumSeq',\$_[0]) }\n1;\n] or eval qq[\n#line 76 "/root/.cpan/build/Math-NumSeq-72-Aq4aSB/blib/lib/Math/NumSeq.pm"\n# print "fallback definition of __\\n";\nsub __ { \$_[0] };\n1;\n] |
| 121 | 0 | 6 | 0 | ref $class_or_self || $class_or_self |
| 227 | 3 | 0 | 236807 | $x != $x || $x != 0 && $x == 2 * $x |