| blib/lib/PFT/Header.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 18 | 31 | 58.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 94 | 15 | 28 | 174 | exists $params->{'date'} and defined(my $d = $params->{'date'}) |
| 98 | 0 | 1 | 10 | defined $d->y && defined $d->m |
| 316 | 0 | 0 | 0 | $self->{'title'} and slugify($self->{'title'}) |
| 360 | 3 | 51 | 0 | $type ne 'GLOB' and $type ne 'IO::File' |
| line | l | !l | condition |
|---|---|---|---|
| 148 | 9 | 53 | $params{'tags'} || [] |
| 179 | 154 | 0 | $text || '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 148 | 0 | 62 | 0 | $params{'opts'} || _opts_default() |
| 149 | 1 | 57 | 4 | $params{'slug'} || $params{'title'} |
| 161 | 2 | 82 | 0 | $type eq 'GLOB' or $type eq 'IO::File' |
| 193 | 152 | 0 | 0 | delete $hdr->{'Slug'} || $title |
| 316 | 123 | 0 | 0 | $self->{'slug'} or $self->{'title'} and slugify($self->{'title'}) |