| blib/lib/Text/Sprintf/Named.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 12 | 14 | 85.7 |
| line | true | false | branch |
|---|---|---|---|
| 35 | 0 | 20 | unless my $fmt = $args->{'fmt'} |
| 45 | 20 | 23 | if (@_) |
| 60 | 2 | 21 | if (scalar keys %{$args;} > 0 and not exists $args->{'args'}) |
| 86 | 4 | 13 | unless (exists $args->{'named_params'}{$args->{'name'}}) |
| 97 | 12 | 18 | if ($args->{'conv'} eq '%') { } |
| 123 | 0 | 2 | if (not @args) { } |
| 1 | 1 | elsif (ref $args[0] eq 'HASH') { } |