| blib/lib/Docopt/Util.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 18 | 22 | 81.8 |
| line | true | false | branch |
|---|---|---|---|
| 31 | 120 | 329 | if $flags & 12288 and not $flags & 16384 |
| 43 | 11807 | 1724 | if (defined $_) { } |
| 44 | 104 | 11703 | unless defined $val |
| 45 | 2715 | 8988 | if $val eq $_ |
| 47 | 241 | 1483 | unless defined $val |
| 55 | 112 | 181 | if (&Scalar::Util::blessed($val) and $val->can('__repl__')) { } |
| 0 | 181 | elsif ((&Scalar::Util::blessed($val) || '') eq 'boolean') { } | |
| 0 | 181 | elsif (ref $val eq 'ARRAY') { } | |
| 58 | 0 | 0 | $val ? : |
| 84 | 530 | 260 | if ($str =~ /\A(.*?)$sep(.*)\z/s) { } |
| 91 | 1537 | 331 | defined $_[0] ? : |