| blib/lib/CPAN/Changes.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 20 | 26 | 76.9 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 40 | 34 | 0 | 3 | @args == 1 and ref $args[0] ne "ARRAY" |
| line | l | !l | condition |
|---|---|---|---|
| 68 | 714 | 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 | 711 | $version =~ s/^v//i or $version =~ tr/.// > 1 |
| 67 | 1 | 2 | 711 | $v ||= $version =~ tr/.// > 1 |
| 105 | 3 | 6 | 10 | grep {length $indents->[0] . $styles->[1] . $_->text > $width if length $styles->[1] > 1;} @{$release->entries;} or not grep({$_->has_entries;} @{$release->entries;}) |
| 117 | 10 | 6 | 3 | $out eq "" or $out =~ /\n\n\z/ |