| blib/lib/Data/Munge.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 28 | 36 | 77.7 |
| line | true | false | branch |
|---|---|---|---|
| 31 | 28 | 9 | if (ref $k) { } |
| 8 | 1 | elsif (defined $k) { } | |
| 33 | 15 | 28 | if ref $x and $k == $x |
| 37 | 3 | 9 | if defined $x and not ref $x and $k eq $x |
| 41 | 1 | 0 | unless defined $x |
| 52 | 0 | 8 | wantarray ? : |
| 53 | 3 | 5 | if $@ |
| 55 | 0 | 5 | wantarray ? : |
| 59 | 1 | 4 | unless @_ |
| 60 | 0 | 10 | unless length $b <=> length $a |
| 61 | 1 | 3 | if $re eq "" |
| 100 | 0 | 2 | $+ eq q['] ? : |
| 0 | 2 | $+ eq '`' ? : | |
| 0 | 2 | $+ eq '&' ? : | |
| 0 | 2 | $+ eq '$' ? : | |
| 107 | 1 | 6 | ref $x ? : |
| 108 | 6 | 1 | if ($g) { } |
| 128 | 1 | 8 | unless defined $s |