| blib/lib/CPAN/Changes.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 22 | 29 | 75.8 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 40 | 34 | 0 | 3 | @args == 1 and ref $args[0] ne "ARRAY" |
| 105 | 0 | 12 | 7 | not $opts{'styles'} and grep({length $indents->[0] . $styles->[1] . $_->text > $width if length $styles->[1] > 1;} @{$release->entries;}) || !grep({$_->has_entries;} @{$release->entries;}) |
| line | l | !l | condition |
|---|---|---|---|
| 68 | 715 | 0 | $version ||= 0 |
| 78 | 7 | 0 | _numify_version($version) || (return undef) |
| 94 | 0 | 16 | $opts{'width'} || 75 |
| 98 | 6 | 10 | $self->preamble || '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 40 | 0 | 3 | 34 | @args > 1 or @args == 1 and ref $args[0] ne "ARRAY" |
| 50 | 3 | 0 | 712 | $version =~ s/^v//i or $version =~ tr/.// > 1 |
| 67 | 1 | 2 | 712 | $v ||= $version =~ tr/.// > 1 |
| 105 | 3 | 6 | 10 | grep({length $indents->[0] . $styles->[1] . $_->text > $width if length $styles->[1] > 1;} @{$release->entries;}) || !grep({$_->has_entries;} @{$release->entries;}) |
| 120 | 10 | 6 | 3 | $out eq "" or $out =~ /\n\n\z/ |