| blib/lib/PDF/Collage/TemplatesCollection.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 20 | 80.0 |
| line | true | false | branch |
|---|---|---|---|
| 20 | 0 | 6 | unless my $list = $self->_resolve(undef, "list") |
| 32 | 2 | 19 | unless $selector = $self->_selector_from($selector) |
| 38 | 19 | 0 | unless ref $definition eq "HASH" |
| 46 | 0 | 49 | unless $keep_extension |
| 51 | 18 | 31 | if length $old_name >= $elen and substr($old_name, -$elen, $elen) eq $extension |
| 66 | 5 | 7 | if ref $selector |
| 74 | 6 | 0 | if ref $candidate eq "CODE" |
| 81 | 12 | 9 | if @$sels == 1 |
| 82 | 1 | 20 | unless defined $selector |
| 84 | 19 | 1 | @candidates ? : |