| web/cgi-bin/yatt.lib/YATT/Fields.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 17 | 20 | 85.0 |
| line | true | false | branch |
|---|---|---|---|
| 16 | 93 | 1056 | if (ref $desc) { } |
| 19 | 11 | 82 | if (@$desc > 1) { } |
| 0 | 82 | elsif (not @$desc) { } | |
| 10 | 72 | elsif (ref(my $value = $desc->[0]) eq 'CODE') { } | |
| 20 | 0 | 185 | wantarray ? : |
| 32 | 222 | 927 | if ($slot =~ s/^([\^=]+)((?:cf_)?)//) { } |
| 36 | 222 | 27 | if $ch eq '^' |
| 37 | 27 | 222 | if $ch eq '=' |
| 43 | 93 | 1056 | if (defined $default) |
| 72 | 0 | 166 | if $@ |