| blib/lib/Perinci/Sub/Convert/default_lang.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 15 | 22 | 68.1 |
| line | true | false | branch |
|---|---|---|---|
| 36 | 0 | 1 | unless my $meta = $args{'meta'} |
| 37 | 0 | 1 | unless my $new = $args{'new'} |
| 41 | 1 | 0 | if $meta->{'links'} |
| 42 | 1 | 0 | if $meta->{'examples'} |
| 43 | 1 | 0 | if $meta->{'result'} |
| 44 | 1 | 0 | if $meta->{'args'} |
| 51 | 0 | 8 | if $old eq $new and $i == 1 |
| 57 | 10 | 2 | unless defined $dh->{$prop} or defined $dh->{$propold} or defined $dh->{$propnew} |
| 58 | 4 | 2 | if (defined $dh->{$prop}) |
| 61 | 3 | 3 | if (defined $dh->{$propnew}) { } |
| 66 | 3 | 3 | if (defined $dh->{$propnew}) |