| blib/lib/VIC/PIC/Any.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 12 | 26 | 46.1 |
| line | true | false | branch |
|---|---|---|---|
| 49 | 1 | 69 | unless (defined $ctype) |
| 51 | 0 | 0 | if ($type =~ /$regex/) |
| 62 | 0 | 51 | if (uc $type eq 'ANY') |
| 67 | 0 | 51 | unless defined $ctype |
| 69 | 0 | 51 | unless eval "require $class;" |
| 76 | 3 | 33 | if (exists $hh{'type'}) |
| 78 | 0 | 3 | unless (defined $stype) |
| 91 | 0 | 3 | wantarray ? : |
| 96 | 0 | 2 | wantarray ? : |
| 102 | 0 | 0 | grep({/$ss/;} @sims) ? : |
| 108 | 18 | 1 | defined $ret ? : |
| 114 | 0 | 0 | unless (defined $ctype) |
| 129 | 0 | 0 | unless (defined $ctype) |